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

Найти произведение всех целых чисел от c до d в паскале

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

Ответ:

Waz4

21.08.2020 06:29

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
var (c,d):=ReadInteger2('C,D=');
Writeln('П = ',Range(c,d).Aggregate(BigInteger(1),(i,j)->i*j))
end.

Пример
C,D= 23 42
П = 1250004633476421848894668800000

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

Ответ:

Alenadobro97

21.08.2020 06:29

Programm abc;
var c,d,i,p:integer;
begin
read (c,d);
p:=0;
for i:=c to d do
p:=p+i;
writeln(p);
end.

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

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

ndzandigiv

07.07.2020 22:19

70 ! выберете верные утверждения: для запуска программы, код которой был написан на компилируемом языке, на компьютере должен быть установлен компилятор этого языка. код...

rafael700rg

07.07.2020 22:19

Как называется устройство компьютера подобную мыши, но только в перевёрнутом виде?...

lol6633

21.03.2022 05:19

Округление ограничение по времени на тест 2 секунды ограничение по памяти на тест 64 мегабайта ввод стандартный ввод вывод стандартный вывод Даны целые числа A и B. Выведите...

llggvvjvhh

02.10.2020 18:35

Выбирайте типы данных с умом ограничение по времени на тест 2 секунды ограничение по памяти на тест 64 мегабайта ввод стандартный ввод вывод стандартный вывод Вычислите произведение...

needhomework19

17.02.2023 22:38

Простой калькулятор ограничение по времени на тест 2 секунды ограничение по памяти на тест 64 мегабайта ввод стандартный ввод вывод стандартный вывод Даны вещественные числа...

12Познователь12

05.08.2021 08:06

Массивы ! напишите программы (сама в паскале не разбираюсь) : 1) заполнить массив нулями и вывести значение в строку. 2) заполнить массив дробными и отрицательными значениями,...

133fdsf7za

05.08.2021 08:06

Появление первых лазерных дисков первые следы иероглифического письма в древнем египте начало книгопечатания в россии появление первых жестких дисков для компьютеров изобретение...

viktrozumovskaoyqqjq

12.04.2023 06:45

Составить программу. язык pascal. 1.составить программу вычисления значения функции. z = (x^3) - 2.5xy + (1.78*x^2) - 12.5*y + 1 при любых значениях x и y 2. составить программу...

Dmitr55

31.07.2021 14:50

потенциальный внп равен 5000 д.е., объем фактического внп в стране составил 4500 д.е. определить фактический уровень безработицы в стране, если естественный уровень безработицы...

Moonlight06

06.09.2020 08:16

Могут ли происходить окислительно-восстановительные реакции между веществами: ph3 и h2so3, h3po4 и ki, h3po3 и k2cr2o7....

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

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