var i,s:integer;
Begin
s:=1;
for i:=1 to 100 do s:=s*i;
writeln(s);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var i,s:integer;
Begin
s:=1;
for i:=1 to 100 do s:=s*i;
writeln(s);
end.