1
var fact = 7;
2
3
fact = fact + 1;
4
5
var c = 0;
6
var result = 1;
7
8
for c = 1 to fact do
9
result = result * c;
10
end;
11
12
print "The factorial is:";
13
print result;