Для следующей напишите программу на языке паскаль: вычислите значение у по формуле у=5х-37, если значение х заедается пользователем

Program z1;
var y,x:real;
begin
writeln('Введите x');
readln(x);
y:=5*x-37;
writeln('y=',y:3:2);
end.