Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Для заданного n>0 вычислить
(3+(6+...+(3(n-1)+(3n)^1/2)^1/2)^1/2)^1/2
(прикрепил в более понятной форме)

Эскизы прикрепленных изображений

в три строки

 
s:=0;
for i:=n downto 1 do
 s:=sqrt(3*i+s)

как то так