Ребят В массиве c1, c2,..., c40 найти произведение чисел, не попавших в интервал [с, d].

Ответы

AnnKJ 15.10.2020 15:06

PascalABC.NETbeginvar c := ArrRandom(40, 1, 20); var (с, d) := ReadInteger2('Введите "с" и "d":'); c.Println; Print('Произведение:', c.Product(x -> x in с..d ? 1:x)) end.

Прирмер работы:

Ребят В массиве c1, c2,..., c40 найти произведение чисел, не попавших в интервал [с, d].

ПОКАЗАТЬ ОТВЕТЫ

Другие вопросы по теме Информатика

2yva293 09.02.2021 18:13

Напиши алгоритм добавления непрерывого воспроизведения звуков в презентации...

просто4классница 09.02.2021 18:13

Рассмотри рисунок напиши небольшой рассказ из 6-7 предложений на тему Мой вклад в охрану окружающей среды Набери его в текстовый редактор. ...

sashalyubimenko 09.02.2021 18:13

Поясніть різницю створення запиту для однієї і кількох таблиць у БД...

valeraKRUT05 16.07.2019 20:00

5. найдите лишнее: текстовый процессор, ms access, графический редактор, субд, отладчик.....

Mira12202 16.07.2019 20:00

Что напечатается в результате выполнения программы a: = комар ; b: = ово c: = insert (b,a,6); writenl (c);...

Ama20Lama04 16.07.2019 20:00

Делфи.поле шахматной доски определяется парой натуральных чисел, каждое из которых не превосходит 8: первое число– номер вертикали (при счете слева направо), второе...

aigulzhan 16.07.2019 20:00

Восемь больше восьми ? надо выполнить еще одно действие b=16,a=5 s=19...

LiraReeman 16.07.2019 20:00

распечатать заданное слово в одной строке с разрядкой (пробел после каждой буквы)....

ксю882 16.07.2019 20:10

Изобразите в виде графа систему,состоящую из четырех одноклассников,между которыми существуют следующие связи(взаимоотношения): дружат: саша и маша, саша и даша,...

Kissss1111 16.07.2019 18:03

Сообщение занимает 40 кбайт памяти. мощность алфавита равна 4. сколько символов (в среднем) содержит страница сообщения, если в сообщении 320 страниц?...

Ребят В массиве c1, c2,..., c40 найти произведение чисел, не попавших в интервал [с, d].

Популярные вопросы