Помогите пж!!!!1 задание
Программа на Паскале:
var x,y,z:real;
begin
writeln('Введите значение x: ');
readln(x);
writeln('Введите значение y: ');
readln(y);
if x
z:=x/y
else
z:=x*y;
writeln('z = ',z);
end.