1. Информатика
  2. Дано натуральное число n,

Дано натуральное число n, вычислить n! (0! =1, n! =n*(n- составить программу на pascal.

ДаняВетренный ДаняВетренный    3   07.10.2019 16:40    7

Ответы
sevostyanova2002 sevostyanova2002  10.10.2020 01:58

var

   a : integer;

   fac : BigInteger := 1;

   

begin

   readln(a);

   if a > 0 then for var i := 1 to a do fac *= i;

   writeln(a, '!=', fac);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
викатевишкамимимишка викатевишкамимимишка  30.09.2021 14:56
Дату и год рождения в двоичную систему перевести 20.08.2008...
КотиКомпотик КотиКомпотик  30.09.2021 16:13
Постройте семантическую сеть на основе текста: «Кошачьи — семейство млекопитающих отряда хищных. Кроме кошек к ним относятся, например, львы и тигры. У кошачьих развиты слух...
typaydevochka typaydevochka  07.10.2019 18:12
Перевести в: двоичную, восьмеричную, шестнадцатеричную систему свой рост.мой рост: (метр.57)​...
nobos9n nobos9n  07.10.2019 18:12
Напиши три аргумента к высказыванию человек-наивысшая ценность ....
St1mx15 St1mx15  07.10.2019 18:14
На древнем монументе одного из племен южной америки был написан текст объемом 1000 символов. определите объем текста если архиологи выясняли,что объем алфавита был 16 символов​...
elay0205 elay0205  18.05.2019 18:20
Запросы sql 1) создать схему бд для таблиц (банк, клиент) 2) создать структуру таблиц (банк, клиент) 1) create schema autorization . . . 2) create table банк(код int not null,...
Chelovechena1 Chelovechena1  18.05.2019 18:20
Ничего нужно найти таблицу переводов из двоичной - в восьмиричную, восьмиричной - в шестнадцатиричную систему счисления, или написать ее сами....
natali1712 natali1712  15.09.2019 07:50
Компьютер в отношениях клиент / сервер, например, веб-браузер а)клиент b) локальные сети c) сервер d) все эти e) ни один из этих...
Lis25pfi174 Lis25pfi174  15.09.2019 07:50
Компьютеры третьего поколения a) используемые вместо вакуумных трубок b) были первыми, кто использовал встроенные устройства обнаружения ошибок c) были первыми, кто использовал...
Den30001 Den30001  12.06.2019 01:30
Назовите свойства объектов операционной системы ( рабочий стол)...

Популярные вопросы