Составить программу: если х <=83 то найти y=28 х +157 иначе вычислить у=20х-595

Var x,y:real;
Begin
   Write(Введите x= ); readln(x);
if (x<=83) then y:=28*x+157
else y:=20*x-595;
Writeln(y=,y);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.