Напишите программу по алгоритму: Нач х=3 у=-9 если (х>у) то (z=x-y иначе z=y-x) вывод (z) кон алг ИЛИ Нач х,у если (х>у) то (z=x-y иначе z=y-x) вывод (z) кон алг
var x,y,z: real;
begin
writeln('Введите значение x:');
readln(x);
writeln('Введите значение y:');
readln(y);
if x>y then
z:=x-y
else
z:=y-x;
writeln('z = ',z);
end.