Задача на циклы.Помогите.

[Поль]

Рассмотреть решение предложенной задачи с использованием всех трех видов циклов. Отладить программу с наиболее рациональным вариантом цикла. Обосновать выбор.
Вычислить: y=sqrt(3+sqrt(6+sqrt(9...+sqrt(63) и куча скобок в конце естесно).
Вот. как что задать, чтобы не вручную вводить все 3+k*3 числа??
--------------------------------------------------------------------------------
Добавлено сообщение
--------------------------------------------------------------------------------
Спасибо. уже не требуется.
Кому интересно, надо решил так:

Код: Выделить всё

var a,d,e:real;
   b:integer;
begin
  b:=0;
  while b<21 do
  begin
  e:=63-b*3;
  a:=sqrt(a)+sqrt(e);
  b:=b+1;
  end;

  Writeln('Resalt: ', a:10:10);
  Readln;
end.

Запара была в том, что думал сделать отталкиваясь от e:=3+b*3.