Факториал числа.Составить программу Паскаль.
Var N, F, i :integer; begin writeln('введите число'); ReadLN(N); F:=1; for i:=1 to N do F:=F*N; write('факториал числа ',N,' = ',F); end.