Тема 4. Программирование линейных и разветвляющихся процессов Пример выполнения задания
Задание.
y
y = x
У
становить
принадлежность точки (x,y)
области на плоскости XY между прямой
y
=x
и параболой
.
0
x
Решение. Ввод координат (x, y)
Составляем
алгоритм,
(y
x)
И (y
)
а затем по нему ДА НЕТ
пишем программу Вывод(‘Точка при- Вывод(‘Точка не
надлежит области’) принадлежит’)
program tochka;
var x,y : real;
begin
writeln(‘Введите через пробел координаты x и y точки’) ;
readln(x,y);
if (y<=x) and (y>=x*x)
then writeln(‘Точка принадлежит указанной области’)
else writeln(‘Точка вне области’)
end.
Варианты задания
Смоделировать работу калькулятора для операций + - * /.
В
ычислить
значение функции 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,
иначе вычислить куб разности.
y
R
Установить принадлежность точки (x, y)
заштрихованной области.
З начения a и R взять произвольно. x
13. Ввести два числа. Если они отличаются меньше чем на 0,5, то из куба большего числа вычесть куб меньшего, иначе найти сумму кубов чисел.
1
4.
Вычислить значение функции
s(t)
s(t) для произвольного t. 1
45
45 2 t
15. Установить, в какой квадрант попадает точка (x, y).
16. Установить, к какому типу относится заданное целое число.
17. Получить два случайных числа, не превосходящих 1000. Взять частное от деления большего на меньшее. Если частное меньше 32 или больше 127, то сообщить об этом; если оно больше 32, но меньше 128, то вывести символ с таким номером.
18. Установить, к чему ближе по абсолютной величине наименьшее из двух чисел - к их среднему арифметическому или среднему геометрическому.
19. Установить, можно ли вписать окружность радиуса R в окно с заданными координатами верхнего левого (xl, yl) и нижнего правого (xr, yr) его углов.
20.
Вывести значение z
для произвольных целого k
9 и вещественного
x.
Если 1
k
3, то z=
;
если 6
k
8, то z=
;
если k=0,
то z=1.
При других k
значение z
не определено.
21. Если сумма двух случайных чисел меньше 1, то вывести их в порядке убывания. Если их сумма больше 1, то - в порядке возрастания.
22. Попадает ли точка с координатами (x, y) в круг единичного радиуса с центром в точке (xc, yc)?
23. Ввести натуральное число, не превышающее 20. Получить два случайных числа из этого же диапазона. Вывести числа в порядке убывания.
24.
Смоделировать работу калькулятора для
вычисления значений функций:
.
25. Ввести 4 числа и установить, можно ли построить параллелограмм со сторонами, имеющими такие размеры.
Т
а а б
б в
в г д
д е
е ж
ж