program name;
var x,y:real;
begin
writeln('Введите числа x и y');
read(x,y);
y:=(25-x)/56;
writeln('y=',y);
end.
program name;
var x,y:real;
begin
writeln('Введите числа x и y');
read(x,y);
y:=(25-x)/56;
writeln('y=',y);
end.