Войти Регистрация Спроси ai-bota

Найти n! (n! =1234 *n) число n запросить с клавиатуры

Нажмите на рекламу ниже и сразу увидите ответ

↓

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

Dydina5555521

01.11.2022 12:56

Задание. В двумерном массиве B, состоящем из N строк и M столбцов, находятся размеры начисленной заработной платы N работников предприятия за M месяцев, т. е. B[ I, K ]...

imbiz

28.08.2021 14:16

анимацииwebGLScrollMagicCSS-анимацииРаспределите!...

alexutkin22241

07.03.2023 13:27

Ім я користувача яке він задає під час реєстрації на поштовому сервері...

Elementrix534

25.06.2021 12:28

Файл размером 4096 байт передаётся через некоторое соединение со скоростью 512 бит/сек. Определите размер файла ( в килобайтах! ), который можно передать за то же время...

yellowumbrella

07.03.2021 00:33

В информационно-математическом классе N учеников. Из них K учеников поняли, что математика и информатика не их предметы: им не нравится ни математика, ни информатика. L...

RazzyMatem

09.12.2022 13:33

2. Хартли формуласы неніанықтайды?...

хорошист438

24.06.2021 16:41

Причины по которым выполняется резервное копирование...

bestsoule

05.11.2020 01:47

Оч нужна класс информатика...

polina033

09.02.2020 03:31

Форматирование текста. Урок 1Соотнеси инструмент форматирования с примером его применения....

АрТёМкА945

29.03.2020 18:26

почему не видно создателя тачпада. я открываю вкалдку мыши и иные указывающие устройства а там просто HID совместимая мышь и второе пс 2 совместимая мышь. а еще нету в вкладке...

Ответ:

nastya2737

08.10.2020 10:51

//PascalABC.NET
//Версия 3.3.5, сборка 1650
begin
var n:=ReadInteger('n=');
write(n,'!=',range(1,n).Aggregate(Real(1),(a,b)->a*b));
end.

0,0(0 оценок)

Ответ:

Юля3класс

08.10.2020 10:51

Var a,b: integer; begin b := 1; Readln(a); for var i := 1 to a do b := b * i; Writeln(b); end.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку