Табулирование функции

[lubov_morkov]

табулирование функции, заданной формулой? в turbo pascal

[p51x]

В поиск. Тут куча похожих тем была.

[lubov_morkov]

такого похожего чет не найду(((

[Stilet]

Я напишу тебе табулирование а ты покажи как на паскале рассчитать без табулирования. Просто функции эти.

[lubov_morkov]

(a*x*x)+(b*c)+с
(a/c)+sqrt(x*x+1)
((a*b*x)/(sqrt(x*x+1)) вот так? простоя вообще 0 в программировании((

[lubov_morkov]

Ну пожалуйста, кто нибудь!!

[Stilet]

Вставил твои формулы в код вот что получилось:

 const dX=0.05;a=2.8;b=-0.3;c=4;
 var y,x:double;
begin
 x:=1;
 while x<=2  do begin
  if x<1.2 then y:=(a*x*x)+(b*c)+c;
  if x=1.2 then y:=(a/c)+sqrt(x*x+1);
  if x>1.2 then y:=(a*b*x)/(sqrt(x*x+1));
  writeln(x:10:3,y:10:3);
  x:=x+Dx;
 end;
 readln;
  { TODO -oUser -cConsole Main : Insert code here }
end.

[lubov_morkov]

ОЙ, спасибки большое