Дана таблица положительных чисел a1, a2, ..., an. Вычислить квадратный корень...

[Vergilloo]

Помогите пожалуйста, очень прошу.

[p51x]

Чем помочь? Благословить на решение? Благославляю.

[Vergilloo]

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

[AlexMas]

Sum:=0;
Mult:=1;
for i:=1 to n do
begin
   Mult:=Mult*a[i];
   Sum:=Sum+sqrt(Mult);
end;