Вычислить значение функции - Pascal ABC (14262)

Формулировка задачи:

Вычислить значения функции и распечатать в виде таблицы х,у: y=(2x+0,7)^16 для пяти равноотстоящих значений х; х1=0,4 h =0,1.

Код к задаче: «Вычислить значение функции - Pascal ABC (14262)»

textual
function f(x:real):real;
begin
f:=power(2*x+0.7,16);
end;
const x1=0.4;
      h=0.1;
      n=5;
var x:real;
    i:byte;
begin
for i:=0 to n-1 do
writeln('x=',x1+i*h:3:1,' f(x)=',f(x1+i*h):9:2);
end.
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

8   голосов, оценка 4.000 из 5


СДЕЛАЙТЕ РЕПОСТ