Операторы цикла

[as1212]

Пусть дано натуральное число п. Вычислите: 1*2 + 2*3*4 +... + п *... * 2п.

[as1212]

Закономерность в ряду

(2п!)/(п-1)!

[as1212]

вроде сделал кусок но что-то не пойму

readln(t);
S:=0;
while n<>? do
for n:=1 to t do
S:=S+(2n)!/(n-1)!

[p51x]

for i:=1 to t do begin
  y := i;
  for j := i+1 to 2*i do y := y*j;
  S := S + y;
end;