В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
bogdanlesja1
bogdanlesja1
05.04.2023 02:17 •  Информатика

Составить программу в паскаль. вывести на экран произведение первых 20-ти натуральных чисел. нужно. заранее ! )

Показать ответ
Ответ:
Doneore
Doneore
08.10.2020 23:50

Типа double должно хватить под это все дело.

В целочисленные типы такое число, увы, не влезет.

var

   i:integer;

   result:double;

begin

   result := 1;

   for i := 2 to 20 do

       result := result * i;

   writeln('Результат = ', result);

end.

0,0(0 оценок)
Ответ:
джамшутик2005
джамшутик2005
08.10.2020 23:50

// PascalABC.NET 3.4.2, сборка 1785 от 06.09.2018


begin

 Range(1,20).Aggregate(biginteger(1),(p,x) -> p*x).Println;

end.


ответ =  2432902008176640000

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота