var
x,y:integer;
z:real;
begin
writeln('Введите значение x: ');
readln(x);
writeln('Введите значение y: ');
readln(y);
z:=x+y/x+16-y*x-24/17+x;
writeln('z = ',z);
end.
var
x,y:integer;
z:real;
begin
writeln('Введите значение x: ');
readln(x);
writeln('Введите значение y: ');
readln(y);
z:=x+y/x+16-y*x-24/17+x;
writeln('z = ',z);
end.