Контрольные вопросы
Какие типы данных относятся к порядковым?
Что выведет оператор writeln(succ(chr(ord(‘d’)+1)))?
Запишите условие принадлежности точки сектору круга с центром в начале координат, расположенном в третьем квадранте.
Как правильно организовать ввод символьных данных?
Чему равен порядковый номер значений: false, #31, -25, pred(true)?
Чему равен результат операций: (15 shr 2 ) and ($11 shl 1)?
Смоделируйте действия оператора CASE с помощью оператора IF.
Каким будет результат вычисления выражения: not true xor (pred(‘A’)>#11) and (succ(‘j’)<chr(ord(‘i’)+1))?
Как выглядит структурограмма алгоритма для примера 2?
Как при выводе на экран выполнить сдвиг курсора влево?
Варианты задания
С
моделировать
работу калькулятора для вычисления
значений функций:
.
Выяснить, попадает ли точка (x, y) в
заштрихованную на рисунке область.
В
ычислить
значение функцииy
в зависимости
от вводимого 45
45
значения аргумента x. 0 1 x
Д
аны три числа:a, b, c. Если хотя бы одно из них равно нулю с погрешностью 0,0001, то вычислить сумму этих чисел, иначе - их произведение.
Вычислить среднее арифметическое трех чисел: a, b, c и вывести их в порядке увеличения отклонения от среднего.
Ввести символ или его код, принадлежащий основной таблице ASCII, проанализировать его и вывести сообщение о том, какой это символ: управляющий, цифра, буква, специальный символ.
Запрограммировать решение уравнения
.Известны три стороны треугольника (ввести с клавиатуры). Вывести сообщение, если этот треугольник прямоугольный равнобедренный или равносторонний.
Получить четыре случайных числа из диапазона от 0 до 1. Если сумма первых двух отличается от суммы двух последних менее чем на 0,01, то вывести произведение сумм, иначе - их частное.
Ввести натуральные числа m и n и вещественное x = 0,5. Если частное m/n четное, то вычислить
, иначе -
.Ввести с клавиатуры три символа. Если хотя бы два из них являются цифрами, вывести все символы в строчку через три пробела.
Сравнить дробную часть вещественного числа, введенного с клавиатуры, со случайным числом. Если разность меньше 0,2, то возвести в нее число 10, иначе вычислить куб разности.
У
становить
принадлежность точки (x,
y)
y
R
з
аштрихованной
области.
З
наченияa
и R
взять произвольно.
r
x
14. Ввести два числа. Если они отличаются меньше чем на 0,5, то из куба большего числа вычесть куб меньшего, иначе найти сумму кубов чисел.
1
5.
Вычислить значение функцииs(t)
s(t)
для произвольного t.
1
45
45 2 t
16. Установить, в какой квадрант попадает точка (x, y).
17. Установить, к какому типу относится заданное целое число.
18. Получить два случайных числа, не превосходящих 1000. Взять частное от деления большего на меньшее. Если частное меньше 32 или больше 127, то сообщить об этом; если оно больше 32, но меньше 128, то вывести символ с таким номером.
19. Установить, к чему ближе по абсолютной величине наименьшее из двух чисел - к их среднему арифметическому или среднему геометрическому.
20. Установить, можно ли вписать окружность радиуса R в окно с заданными координатами верхнего левого (xl, yl) и нижнего правого (xr, yr) его углов.
21. Вывести значение
z
для произвольных целого k
9 и вещественного x.
Если 1
k
3, то z=
;
если 6
k
8, то z=
;
если k=0,
то z=1.
При других k
значение z
не определено.
22. Если сумма двух случайных чисел меньше 1, то вывести их в порядке убывания. Если их сумма больше 1, то - в порядке возрастания.
23. Упадет ли объект с высоты H на платформу, имеющую длину L и движущуюся равномерно с заданной скоростью V, если в момент начала падения середина платформы находилась на расстоянии S от места падения? Объект считать материальной точкой.
24. Попадает ли точка с координатами (x, y) в круг единичного радиуса с центром в точке (xc, yc)?
25. Ввести натуральное число, не превышающее 20. Получить два случайных числа из этого же диапазона. Вывести числа в порядке убывания.
Лабораторная работа 3