Найти Корень

[aless23]

Прошу разобратся в следующей задаче:

Вычислить:

S=(sqrt(100)+sqrt(98)+sqrt(96)...+s qrt(4)+sqrt(2))

Заранее огромное спасибо!!

[Pein95]

и в чем проблема? не може цыкл написать?

[VIK_aka_TOR]

var i: integer;
s: real;
begin
s:=0;
for i:=1 to 50 do
   s:= s + sqrt(2*i);
writeln(s);
end.