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

Question

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

Answer 1

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

Comments

спасибо)