Question

як скласти програму розв'язку цього виразу для програми Паскаль?? ​

Answer 1

begin

var x, y: real;

Write('x= ');

Read(x);

if x < 5

then y := 25 * x - 124

else if x > 9

then y := 22 * Sqrt(x)

else y := 6 * Sqrt(25 * x) + 2;

Writeln('y= ', y);

end.