Составить блок-схему алгоритма и программу на Паскале для вычисления функций 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.