Задать массив из 12 элементов датчиком случайных чисел. Найти сумму чисел больших 5.
2. Задать массив из 6 элементов с клавиатуры. Найти количество чётных чисел.

ДимаИванов11 ДимаИванов11    3   27.02.2020 09:28    2

Ответы
милуя милуя  11.10.2020 14:18

                                                  PascalABC.NET

1)

begin

 ArrRandom(12, 0, 10).Where(x -> x > 5).Sum.Print

end.

2)

begin

 ReadArrInteger('Введите массив:', 6).Where(x -> x.IsEven).Count.Print

end.


Задать массив из 12 элементов датчиком случайных чисел. Найти сумму чисел больших 5. 2. Задать масси
Задать массив из 12 элементов датчиком случайных чисел. Найти сумму чисел больших 5. 2. Задать масси
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика