Question

Написать программу, вычесляющую значение функции x^2/3+x free pascal

Answer 1

Ответ:

var

 x,y: real;

begin

 Write('Введите значение x = ');

 readln(x);

 y := (x*x)/(3+x);

 Writeln('y = ',y);

end.