вы получите факториал 5! = 120.
var f, i:integer;beginf := 1;for i := 1 to 5 dof := f * i;writeln (f);end.
вы получите факториал 5! = 120.
var
f, i:integer;
begin
f := 1;
for i := 1 to 5 do
f := f * i;
writeln (f);
end.