Составить программу решения уравнения.
Z=y/x-1

var z,y,x:real;beginwriteln('Введите значение y: ');readln(y);writeln('Введите значение x: ');readln(x);z:=y/x-1;writeln('z = ',z);end.

var  z,y,x:real;beginwriteln('Введите значение y: ');readln(y);writeln('Введите значение x: ');readln(x);z:=y/x-1;writeln('z = ',z);end.