Факториал - Pascal ABC (12580)

Формулировка задачи:

Здравствуйте,помогите пожалуйста написать программу.Напишите программу, которая вычисляет факториал натурального числа N ( 1 ≤ N ≤ 10000 ), сохранив все значащие цифры. Факториалом называется произведение всех натуральных чисел от 1 до N : N ! = 1·2·3... ( N - 1)· N . Входные данные Входная строка содержит натуральное число N ( 1 ≤ N ≤ 10000 ). Выходные данные Программа должна вывести факториал числа N . Примеры входные данные 6 выходные данные 720

Решение задачи: «Факториал»

Листинг программы

var
N,i,k:longint;
begin
k:=1;
write('Введите N: ');
readln(N);
for i:=1 to N do begin k:=k*i;
writeln(N,'! = ',k);
end;
end.

Объяснение кода листинга программы

Переменная k инициализируется значением 1.
Выводится сообщение «Введите N: », чтобы пользователь мог ввести значение переменной N.
Считывается значение переменной N с помощью функции readln().
Запускается цикл for, который выполняется от 1 до N (включительно).
Внутри цикла значение переменной k умножается на значение переменной i.
Выводится сообщение N! = с значением переменной k.
Цикл завершается, и программа заканчивается.