tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Даны два целых числа
Даны два целых числа a и b (a < b). найти произведение всех целых чисел от a до b включительно.
zaninartur
3 17.08.2019 02:20
1
Ответы
CorrupteD
04.10.2020 23:53
// PascalABC.NET 3.2, сборка 1367 от 20.12.2016
// Внимание! Если программа не работает, обновите версию!
begin
var a,b:integer;
Write('Введите a и b: '); Read(a,b);
Writeln('П=',Range(a,b).Aggregate(BigInteger(1),(m,n)->m*n))
end.
Пример
Введите a и b: 13 57
П=84607064997021339293398188869165201400121387478093188300800000000000
ПОКАЗАТЬ ОТВЕТЫ
dreakalex
04.10.2020 23:53
Ввод: A ^ B С/П.
П0 <-> П4 1 П1 ИП4 ИП1 * П1 КИП4 ИП4 ИП0 - x<0 05 ИП1 С/П
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
dmitrocreativ
17.08.2019 11:00
Определить мощность алфавита, если сообщение, содержащее 40 символов, занимает 30 байт....
aajlarov
21.05.2020 14:41
Виберіть програмні об‘єкти в середовищі Scrach: А) скрипт Б) сцена В)рудий кіт Г)спраци Д)Проєкт (Несколько вариантов)...
Manasyan85140
21.05.2020 14:41
Запиши ответы. ( запиши данное число в двоичной, восьмеричной и шестнадцатеричной системе счисления) Системы счисления: Десятичная: 3 Двоичная: Восьмеричная: Шестнадцатеричная:...
sofiabogdanova1
21.05.2020 14:41
Какие действия может выполнять текстовый редактор?...
veralyagonova
23.05.2019 20:20
Составить программу в паскаль авс которая находит меньшее из двух заданных различных целых чисел и выводит его на экран....
kiraganziy
11.04.2019 12:15
Завдання 1 . проект акваріум створити проект в середовищі scratch : - рибки рухаються випадковим переміщенням; - восьминіг міняє колір; - рак бігає по дну - зберегти проект під назвою...
ГрознаяВафля
11.04.2019 10:18
Укажите основные проблемы возникающие при создании и введении баз !...
2346573920316
03.08.2019 01:50
Внести в таблицу названия устройств компьютера: ввод и вывод для следующих устройств: текст, звук, фотографии, видео...
anickeeva2013
29.07.2019 10:20
Решите уравнение , ch2oh i choh +naoh i ch2oh следующее уравнение ch3ch2oh+na следующее уравнение ch3cooh+ch3oh...
А1А2А3А
29.07.2019 10:20
Найдите значение выражения 0,6(4x-12)-0,4(5x-7)при том что x=четыре целых одна четвёртая...
Популярные вопросы
Какое отношение к природе К. Па-устовский называет преступным? Как перекликается...
3
Запишите экономические, политические и культурные последствия монгольского нашествия...
3
форма ступеня порівняння від єслова голосно...
1
Міні твір що таке справжня дружба за творами М.Коцюбинського О.Довженка Н.Бічуї...
3
ОЧЕНЬ Календы - так римляне называли... А) последние дни каждого месяца Б) дни...
1
пятая часть века и ещё два года. Сколько это лет?...
3
Підготуйте повідомлення про демографічну політику в одній із країн світу...
2
1. Какая песня, написанная в первые дни войны, является своеобразным гимном? 1....
1
851. Дүниежүзі бойынша көмір өндірудің пайызға шаққандағы үлесімынадай: Еуропа...
3
Закончи высказывание, чтобы оно стало верным. В Юго-Западной Азии преобладает население...
1
// Внимание! Если программа не работает, обновите версию!
begin
var a,b:integer;
Write('Введите a и b: '); Read(a,b);
Writeln('П=',Range(a,b).Aggregate(BigInteger(1),(m,n)->m*n))
end.
Пример
Введите a и b: 13 57
П=84607064997021339293398188869165201400121387478093188300800000000000
П0 <-> П4 1 П1 ИП4 ИП1 * П1 КИП4 ИП4 ИП0 - x<0 05 ИП1 С/П