1. Информатика
  2. хелп Составьте программу вычисления

хелп Составьте программу вычисления в массиве A(15) произведения нечетных элементов. Сделайте программу на паскале

маленькийпушистый маленькийпушистый    1   02.07.2020 13:13    3

Ответы
SuPeRGaMeRDGRST SuPeRGaMeRDGRST  15.10.2020 15:09

--- PascalABC.NET 3.6.3 ---

begin

 var A := ArrRandom(15, -99, 99);

 A.Println;

 A.Where(p -> p mod 2 <> 0).Product(x -> BigInteger(x)).Println;

end.

ПОКАЗАТЬ ОТВЕТЫ
gleb24nic gleb24nic  15.10.2020 15:09
PascalABC.NETbegin ArrRandom(15, -99, 99).Println.Product(x -> x.IsOdd?BigInteger(x):1).Print end.

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


хелп Составьте программу вычисления в массиве A(15) произведения нечетных элементов. Сделайте програ
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
valeri0910200 valeri0910200  25.12.2019 18:06
Слот – це … місце для встановлення планки оперативної пам яті підставка для монітора місце для встановлення процесора місце для під єднання принтера...
metelyovavickt metelyovavickt  25.12.2019 18:08
3) в текстовом файле k8-6.txt находится цепочка из символов, в которую могут входить заглавные буквы латинского алфавита a…z и десятичные цифры. найдите длину самой длинной...
MokrovaDiana MokrovaDiana  25.12.2019 18:13
100 + лучший ответ! максимально подробно!...
алюберт алюберт  25.12.2019 18:13
Всовершении кражи подозреваются ослик, кролик, пятачок. подозреваемые дали следующие показания: ослик: «неверно, что все мы воровали», кролик: «если я воровал, то и пяточок...
anna18181818 anna18181818  25.12.2019 18:14
Решить контрольную по первые четыре номера нужно, по графе паскальпод первыми двумя видно пример оформления​...
nikitatutaev03 nikitatutaev03  22.05.2020 00:26
Из-за каких особенностей Ехсel считают удобным для использования в качестве базы данных?...
sovuhe465 sovuhe465  03.09.2020 23:52
Информатика: А. Зачем и как измерять информацию? В. Каков вероятностный метод определения количества информации? С. Что описывает формула Ральфа Хартли?​...
gerger10 gerger10  03.09.2020 23:52
Ақпаратты өлшеуде қандай екі тәсілді білесіңдер​...
pdgjdis pdgjdis  28.08.2019 15:20
Введите массив из 5 элементов с улавиатуры и выведите те элементы массива которые больше 8 если таких элементов нет то сообщить об этом...
tka4ukilia2017 tka4ukilia2017  28.08.2019 15:20
Написать программу в паскаль аbc : напишите программу которая в последовательности натуральных чисел определяет чётное минимальное число. при этом кол-во введённых чисел...

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