Зачем эта перменная (Delphi)

[reasons]

Доброго времени суток.Ув. Постояльцы прошу помощи в том, чтобы разообраться зачем нужна эта переменная и что она делает.

Вот код, красным подсвечено то что не понятно.

procedure TForm1.Button1Click(Sender: TObject);      
var  a,b:real;
     i,r1,rn:integer;
begin
r1:=strtoint(edit2.text);
rn:=strtoint(edit1.text);
series2.Clear;
series3.Clear;
series4.Clear;
a:=strtofloat(edit4.Text);
b:=strtofloat(edit5.Text);
for i:=r1 to rn do
begin
series2.addxy(i,eps(pr(a,b,round(power(2,i)))));
series3.addxy(i,eps(tr(a,b,round(power(2,i)))));
series4.addxy(i,eps(sp(a,b,round(power(2,i)))));
end;
end;

а вот функция pr

Function pr(a,b:real;n:integer):extended;  // ôóíêöèÿ ìåòîäà ïðÿìîóãîëüíèêà
var sum,h:real;
    i:integer;
begin
sum:=0;
h:=(b-a)/n;
i:=1;
while i<=n do
begin
sum:=sum+f(a+h*i-h/2)*h;
i:=i+1;
end;
pr:=sum;
end;

подскажите пожалуйста для чего мы в отрисовке графика возодим 2 в итую степень и округляем.

[Пепел Феникса]

откуда я знаю?
наверно по формуле так надо.(учитывая что i это -Х, похоже что так и есть)

[reasons]

Сообщение от Пепел Феникса

откуда я знаю?
наверно по формуле так надо.(учитывая что i это -Х, похоже что так и есть)

чисто логически на месте этого возведения должно стоять N - число разбиений. И вот я не могу понять почему именно там 2 в i-той степени=( может есть какие-то идеи?

[Пепел Феникса]

чисто логически?
а вы смотрели формулу этого кода?(по которой код написан).
вы принесли суда какие то кусочки кода, по которым практически нельзя ничего сказать...

знаете что я отвечу, и что будет правдой?
раз там стоит так, значит автору кода так было нужно.

[Trial]

Если незнаешь что это и для чего нужно, поизменяй значения в этой строке и глянь на результат, может чего и поймёшь

[reasons]

Я не понимаю зачем сразу так нападать? Если поможет сути дела, то могу выложить весь код программы. Мне не понятно к чему вы так агрессивны?

[reasons]

Сообщение от Trial

Если незнаешь что это и для чего нужно, поизменяй значения в этой строке и глянь на результат, может чего и поймёшь

Смотрел через watchlist, i постоянно равно нулю.

[Korben5E]

Сообщение от reasons

подскажите пожалуйста для чего мы в отрисовке графика возодим 2 в итую степень и округляем.

а это шайтан программер так придумал

я-бы конечно обошелся 2 shl i

ну тут хитрая задумка - вдруг степень числа 2 (с целой степенью) будет дробной

а вообще я так понял - это обход отрицательных чисел.

[Korben5E]

Сообщение от reasons

Смотрел через watchlist, i постоянно равно нулю.

плохо смотрел... там значения из....

r1:=strtoint(edit2.text);
rn:=strtoint(edit1.text);

[reasons]

Сообщение от Korben5E

плохо смотрел... там значения из....

r1:=strtoint(edit2.text);
rn:=strtoint(edit1.text);

вот число получемое из

round(power(2,i))

заносится в n в функция раасчета по методу прямоугольников треугольников и методу симпсона. получается что эти функции считают графики погрешностей.может толкнет на какую идею)