Пожаловаться
- 25.05.2018 00:46
- Информатика
- remove_red_eye 13323
- thumb_up 29
Ответы и объяснения 2
//PascalABC.NET 3.1 сборка 1239
begin
PrintLN(Range(1, 25, 2).Aggregate(1.0, (s, x)-> s * x));
end.
Ответ
7905853580625
Пожаловаться
- 25.05.2018 05:00
- thumb_up 8
//Pascal ABC.NET v3.1 сборка 1219
Var
i,a:int64;
begin
a:=1;
for i:=1 to 25 do
a:=a*i;
writeln(a);
end.
Пожаловаться
- 26.05.2018 19:50
- thumb_up 31
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы