if not (((x>=0.5) and (x<=2)) or ((y>=0.5) and (y<=2)))
then begin x:=x/10; y:=y/10 end;
writeln('результат:');
writeln('x= ', x:6:3);
writeln('y= ', y:6:3)
end.
Задание на работу
1. Выбрать задание и задачу с номерами, соответствующими последней цифре студенческого билета (таблицы 6, 7).
2. Составить программу вычисления значения y заданной кусочно-непрерывной функции для произвольных значений исходных данных (таблица 6).
3. Подготовить исходные данные для контрольного расчета значения функции по каждой формуле. Выполнить контрольные расчеты и расчет для заданных исходных данных.
4. Составить программу решения задачи из таблицы 7
Таблица 6 – Варианты заданий
Вариант
Исходные данные
Функция
y =
y=
y =
y =
y =
y =
y =
y =
y =
y =
Таблица 7 – Варианты задач
Номер варианта
Задача
Даны две переменные вещественного типа: A, B. Перераспределить значения данных переменных так, чтобы в A оказалось меньшее из значений, а в B — большее. Вывести новые значения переменных A и B.
Даны две переменные целого типа: A и B. Если их значения не равны, то присвоить каждой переменной сумму этих значений, а если равны, то присвоить переменным нулевые значения. Вывести новые значения переменных A и B.
Даны три числа. Найти наименьшее из них.
Даны три числа. Найти среднее из них (то есть число, расположенное между наименьшим и наибольшим).
Даны три числа. Найти сумму двух наибольших из них.
Даны три переменные вещественного типа: A, B, C. Если их значения упорядочены по возрастанию, то удвоить их; в противном случае заменить значение каждой переменной на противоположное. Вывести новые значения переменных A, B, C.
Даны три переменные вещественного типа: A, B, C. Если их значения упорядочены по возрастанию или убыванию, то удвоить их; в противном случае заменить значение каждой переменной на противоположное.
Вывести новые значения переменных A, B, C.
Даны три целых числа, одно из которых отлично от двух других, равных между собой. Определить порядковый номер числа, отличного от остальных.
На числовой оси расположены три точки: A, B, C. Определить, какая из двух последних точек (B или C) расположена ближе к A, и вывести эту точку и ее расстояние от точки A.
Даны три числа. Вывести вначале наименьшее, а затем наибольшее из данных чисел.