Табулирование функции, hellp Опции

[РЕЗИНОВАЯ ЗИНА]

помоги составить программу табылирования функции

    Ln^2|x-2|+sqrt(x+3) , x<=2

y=
 
    E^(6-2x)+2cos^3(x-3), x>2

на отрезке [1,3] c шагом 0.2
чето я совсем запутался.

Сообщение отредактировано: volvo - 12.11.2005 2:20

[Altair]

Ln^2|x-2|
логорифм квадратный от х-2 по модулю
2cos^3(x-3)
2 сos куб(х-3)

тебье повезло я так и подумал.

а без функций никак нельзя?

можно.

Const
 a:double = 1;
 b:double = 3;
 step:double = 0.1;
 eps:double = 0.00001;
var
 x,r:double;
begin
 x:=a;
 while abs (b-x)>eps do begin
  if x<=2 then r:=sqr(ln(abs(x-2)))+sqrt(x+3)
  else r:=exp(6-2*x)+2*sqr(cos(x-3))*cos(x-3);
  writeln(x:10, r:10);
  x:=x+step
 end;
 readln
end.

а почему step=0,1?

"c шагом 0.2"
прости, ошибся, исправь на 0.2

или если double, то оно удваивается?

нет, double протсо вещесвенный тип, "двойной точности"
не люблю real.. (причина )