Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
2 апреля 2023 21:24
902
Найди сумму положительных элементов массива, размерности 15, заполненного с помощью случайных чисел из промежутка (-15;23).
1
ответ
Ответ:
--- PascalABC.NET 3.6.2 ---
begin
var A := ArrRandom(15, -15, 23);
A.Where(p -> p > 0).Sum.Println;
end.
--- Описание использованных методов ---
ArrRandom(n, a, b) -> Возвращает Array of Integer длиной n, заполненный случайными значениями из диапазона [a, b];
.Where(predicate: T -> boolean) - Расширение Array of T (Может быть вызвано для Array of T независимо от типа T), выполняющее фильтрацию массива заданной логической функцией (предикатом). Возвращает Sequence of T.
.Sum - Суммирует элементы итерируемого объекта, для которого вызвано.
.Println - Выводит в консоль значение или строковое представление объекта, для которого вызвано.
--- PascalABC.NET 3.6.2 ---
begin
var A := ArrRandom(15, -15, 23);
A.Where(p -> p > 0).Sum.Println;
end.
--- Описание использованных методов ---
ArrRandom(n, a, b) -> Возвращает Array of Integer длиной n, заполненный случайными значениями из диапазона [a, b];
.Where(predicate: T -> boolean) - Расширение Array of T (Может быть вызвано для Array of T независимо от типа T), выполняющее фильтрацию массива заданной логической функцией (предикатом). Возвращает Sequence of T.
.Sum - Суммирует элементы итерируемого объекта, для которого вызвано.
.Println - Выводит в консоль значение или строковое представление объекта, для которого вызвано.
0
·
Хороший ответ
4 апреля 2023 21:24
Остались вопросы?
Еще вопросы по категории Информатика
Как называется программное обеспечение для работы с базой данных?  1. это и есть база данных  2. система управления базой данных  3. информационн...
После выключения компьютера пропадает информация ,находящаяся... А. в оперативной памяти Б. на USB флеш-накопителе В. на жестком диске Г. на CD д...
Юра сказал маме: "Хочу яблоко". Она принесла ему очищенное яблоко. На другой день Юре подарили робота. Он опять сказал: "хочу яблоко". Но робот не сдв...
СРОЧНО , ВСЕМ ДОБРА , ПИШИТЕ ОТВЕТЫ , Я СНОВА ДОТЯНУЛА И СЕЙЧАС НУЖНО ДЕЛАТЬ ВСЕ ЭТО , А НЕ СПАТЬ В ПОСТЕЛЬКЕ . 1.Укажите время утверждения григорианс...
Что такое цинизм,на простом языке, примеры цинизма...