Toan ve Giai thua`

Ban nao` gjai dum mjnh baj nay` nhe':
1! + 2! + 3! + 4! + 5! +.....+100!=????
Share cho mjnh dap an som 1' nha!

mi muốn kết quả là Lập trình pascal or đáp số

sr bà koan vì mấy hôm nay tibon bận học bài để kt đầu năm nên có chút chậm trễ .
Sau đây là đáp án của bạn Yingwei
program bt;
var S,gt,i,j:integer;
Begin
S:=0;gt:=1;
for i:=1 to 100 do
for j:=1 to i do
begin
gt:=i*j;
S:=S+gt;
end;
writeln('tong la:',S);
readln;
end.
Đấy là đáp án (có ai đừng lôi ra đập tibon ). Mong bà koan ủng hộ (dù sao pascal cũng học hơn 1 năm rồi nên quên).
Thân !
P/S: nếu có lỗi vui lòng post lên mình sẽ cố gắng sửa (đau lòng là nhà ko cài pascal nên ko test trước đc).

thanhks tibon nhiu nha nhung the faj lap trinh pascal that ha?

Chài thì môn tin học lớp 11 học về pascal mà..........

có chi bày tui voi nha tí bon