Табулирование функции - Turbo Pascal (33582)

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

заданной выражением: Y = х2 + 4x + 3, когда x изменяется от –2 до 2 с шагом 0.2. Использовать для вычислений подпрограмму-функцию.

Код к задаче: «Табулирование функции - Turbo Pascal (33582)»

textual
uses crt;
const a=-2;
      b=2;
      h=0.2;
function f(x:real):real;
begin
f:=x*x+4*x+3
end;
var x:real;
begin
clrscr;
x:=a;
while x<b+h/2 do
 begin
  writeln('x=',x:4:1,' f=',f(x):5:2);
  x:=x+h
 end;
readln
end.

10   голосов, оценка 3.900 из 5


СОХРАНИТЬ ССЫЛКУ