Надо написать программу Вычислите N! ("эн-факториал") – произведение всех натуральных чисел от 1 до N ( N!=1∙2∙3∙…∙ N ). Входные данные Вводится единственное число N – натуральное, не превосходит 12. Выходные данные Выведите полученное значение N! Примеры входные данные 2 выходные данные 2 входные данные 3 выходные данные 6 (На Паскале) Буду благодарен

Ответы:
Ульяна Рыбак
24-10-2010 06:03

program fact;varn, f, i: integer;beginf := 1;readln(n);for i := 2 to n dof := f * i;writeln(f);end.

Андрюха Лосев
24-10-2010 14:28

var  b,i,k,n: int64;begin  readln(n);  b:=1;  for  i := 1 to n do    b:=b*i;  writeln(b);end.Входные данные подставлять в переменную n

Также наши пользователи интересуются:

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Надо написать программу Вычислите N! ("эн-факториал") – произведение всех натуральных чисел от 1 до N ( N!=1∙2∙3∙…∙ N ). Входные данные Вводится единственное число N – натуральное, не превосходит 12. Выходные данные Выведите полученное значение N! Примеры входные данные 2 выходные данные 2 входные данные 3 выходные данные 6 (На Паскале) Буду благодарен» от пользователя Камила Губарева в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!