Составить программу вычисления значения функции :

var

 x:real;

begin

 read(x);

 if ( x > 15) then

   write('y = ', 9*x + 3*x*x)

 else

   write('y = ', 3*x - 5*sqrt(x+28));

end.

var

x:real;

begin

read(x);

if ( x > 15) then

  write('y = ', 9*x + 3*x*x)

else

  write('y = ', 3*x - 5*sqrt(x+28));

end.

Объяснение: