Question

Elaborati un program(pascal)
pentru a calcula valoarea expresiei Y=3X la a patra +12X la a treia -125X-39,utilizind un subprogram

Answer 1

Răspuns:

program calcul;

var x,y:real;

function f(x:real):real;

begin

 f:=3*sqr(x)*sqr(x)+12*x*sqr(x)-125*x-39;

end;

begin

 write('x= '); read(x);

 y:=f(x);

 writeln('y= ',y);

end.

Explicație: