1!+2!+3!+4!+5! Пожалуйста посчитайте это задачу на Программном языке Pascal или DelphiТолько правильно даю 30 поинтов.

Делал вчера, здесь вычисляется сума факториалов в промежутке от n до m
var
var
i,m,n,s:integer;

function fact(a:integer):integer;
var l:integer;
begin
l:=1;
for i:=2 to a do
l:=l*i;
fact:=l;
end;

begin
read(m);
readln(n);
s:=0;
for i:=m to n do
s:=fact(i)+s;
writeln('Suma: ',s);
end.