Знак суммы. (Сверху r, снизу i=1.) *(i+3)! (! - факториал)

Желательно программу написать по-проще, т.к. я с паскалем на ВЫ.
ПОЖАЛУЙСТА помогите!!!!!!

Ты можешь формулу записать в ворде и сделать скрин, а то не понятно. Может как и в этой теме Работа над суммами и факториалами ?

Вот. Для этой формулы мне нада написать прогу

uses crt;
var
   n,r,i:word;
   s,fac:real;
begin
     clrscr;
     writeln(' Vvedite n: ');
     read(n);
     fac:=6;
     s:=0;
     for i:=0 to n do begin
         fac:=fac*(i+4);
         s:=s+fac;
         writeln(' Fac= ',fac:0:1,'  S= ',s:0:1)
     end;
     readkey
end.

Так?

Нет... Вот так:

     for i:=1 to n do begin { <--- От 1, а не от 0... }
       fac:=fac*(i+3); { <--- 3 а не 4 }

иначе ты получишь слишком большую сумму... Проверь на n = 1, например...

Да, тока тогда еще

fac:=fac*(i+3) // а не 4;

ОТ ВСЕЙ ДУШИ БЛАГОДАРЮ!!!
тока подскажите что за команда word?

word - тип данных. Переменная такого типа принимает значения в диапазоне 0..65536, только положительные

СТОП! а почему это факториал равен шести???

у тебя же (i+3)!, при i=0 факториал равен 3!=1*2*3=6