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

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

Показать ответ

Ответ:

ангилино

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 оценок)

Ответ:

dadert1

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 оценок)

Популярные вопросы: Информатика

Rigina1984

11.10.2022 10:39

Составьте программу заполняющую массив из 5 элементов,нечётными числами начиная с 3.в кумире....

KOTEНОКGAB

25.07.2020 11:49

Однажды некий путешественник гостил на острове рыцарей и лжецов. Там ему встретились два местных жителя. Путешественник спросил одного из них: Кто нибудь из вас рыцарь? Его вопрос...

ВыберитеНик976476

24.02.2022 05:06

Запишите значение переменной n, полученное в результате работы следующей программы:...

sehya72

09.10.2021 06:38

Вывести на экран номера всех сетных элементов массива случайных чисел размерностью , и сам массив...

unisens

11.09.2021 06:18

Написать программу, которая считывает три числа день, месяц и год, и выводит дату следующего дня. високосный год не учитывать. программа c++...

semic1

22.09.2021 19:41

Определите десятичный эквивалент шестнадцатеричных чисел 111 2acd 68f d306d...

den13232

22.09.2021 19:41

Расставьте между цифрами знаки ари фметических действий (+,: ) и,если надо,скобки так,что бы ответ оказалася равным 1. 1 2 3 4 5 6 1 2 3 4 5 6 7...

sauleshka3

22.09.2021 19:41

Надо вставить )) модель является процесса моделирования. модель может иметь ту же форму цвет тот же элементный что и моделируемый . модель обладает не всеми а только некотороми...

Sonechka9youtobe

07.01.2021 10:01

с задачей по информатике, с дано и решением с формулами и т.дСкорость передачи данных равна 512000 бит/с сколько секунд займёт передача файла объёмом 400 килобайт по этому каналу...

lanadanelianlana

06.10.2020 22:26

До якого виду пам’яті відноситься флеш пам ять?...

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

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