Determinați ce va afișa la ecran în rezultatul executării programului de mai jos.
var n,i k: integer;
begin
k:= 1; n:=5;
for i :=1 to n do k:=k*i;
write (k);
end.