
Павел
7 год назад
Данн массив A(5)определить сумму элементов кратных 8.генератор случайных чисел [20;40].вывести список элементов массива в одну строку
ОТВЕТЫ

Мокий
Jul 14, 2019
// PascalABC.NET 3.2, сборка 1356 от 04.12.2016
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(5,20,40); a.Println;
Writeln(S=,a.Where(x-gt;x mod 8=0).Sum)
end.
Пример
24 23 35 40 22
S=64
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(5,20,40); a.Println;
Writeln(S=,a.Where(x-gt;x mod 8=0).Sum)
end.
Пример
24 23 35 40 22
S=64
234
Смежные вопросы: