Составить алгоритм нахождения функции: Y = { x^2 + 2, если x-7

program zz1;

var x, y:real; / / задаем переменные не целого типа

begin

write (' введите исходное значение х '); / / вводим с клавиатуры исходное значение х

read (x);

if x < = - 7 then y:=sqr (x) + 2 else y:=cos (x); / / проверяем, если значение х меньше или равно минус семи, то функцию считаем по одной формуле, если больше минус семи, то по другой

write (' полученное значение функции = ', y:5:2); / / выводим ответ в формате пять знаков для всего числа и два знака после точки

end.