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

Узнай цену своей работы

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

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

Решение задачи: «Табулирование функции»

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.9 из 5