Составить блок-схему алгоритма и программу на Паскале для вычисления функций z. Ввести программу в ЭВМ, вычислить значения функции и проверить ее для самостоятельно выбранных трех пар значений переменных X и Y.

Ответ:

program test;

const

e=2.71828;

var

z, x, y: real;

begin

 write ('Введите значение х: ');

 read (x);

 write ('Введите значение y: ');

 read (y);

 if sqrt(x) + y > 10 then

   z := sin(4*x*y)

 else if sqrt(x) + y < 10 then

   z := (-1 * x) + 2 * y

 else z:= x-e;

 write ('Функция z = ',z);

end.