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

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

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

Код к задаче: «Факториал - Pascal ABC (12580)»

textual
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.

12   голосов, оценка 4.083 из 5


СОХРАНИТЬ ССЫЛКУ