объясните Что означает ANS в этой программе

[Азамат1]

вот сама программа
uses crt;

var
i, n : integer;
Ans : real;

begin
Write('N = '); Readln(n);
Ans := 0;
for i := n downto 0 do
Ans := Ans + sqrt(2 + i);
Writeln('Ответ: ', Ans:0:2);
end.

а вот условие
IMG_20130513_161820.jpg

[Sciv]

Ans - сумма квадратных корней из (i+2)

[Poma][a]

А Вам не кажется что тут косяк?
В программе вычислится не "N корней", а N+1 корень.
Должно быть for i := n-1 downto 1 do

Кстати, если в задании идет сначала корень из 2, корень из 3, корень из M. То почему Вы сначала ставите корень из M? По-моему это не очень хорошо.

Вот еще вариант от меня..

for i := 2 to n+1 do 
     res := res + Sqrt(i);

[Sciv]

А Вам не кажется что тут косяк?

Риспект тебе, Ромаха, не поленился скачивать

Я вот в задание даже не смотрел.

И судя по вопросу автора темы, твои вопросы обращены не по адресу - программа скорее всего не его.