Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

Составь программу и вычисли значение У: при X < 12, Y=-7,8 при X = 12, Y=54,4 при X >12, Y=2*Х+15

Ответ оставил Гость

Var x,y:real;
begin
write(x = ); readln(x);
if x>12
   then y:=2*x+15
  else if x=12 then y:=54.4 else y:=-7.8;
writeln(y = ,y);
end.

Пример:
x = 10
y = -7.8