Turbo Pascal!

Составить программу для вычисления

значение функции:

y={x^2, если х<0

x-5, если х>5

0, если 0≤х≤5

Question

Мелания

10 марта, 13:47

+2

Ответы (1)

Знаете ответ?

Фридерика · Answer 1

Var x, y:real;

begin

write ('x=') ; readln (x) ;

if x<5 then y:x*x

else if x>5 then y:=x-5 else y:=0;

writeln ('y=', y:6:3) ;

end.

Turbo Pascal!Составить программу для вычислениязначение функции:y={x^2, если х<0x-5, если х>50, если 0≤х≤5