Заполнить массив из 25 элементов случайными числами в интервале (20, 100) и вычислить сумму всех элементов массива А, которые делятся на 3
Заполнить массив из 25 элементов случайными числами в интервале (20, 100) и вычислить сумму всех элементов массива А, которые делятся на 3
Ответ(ы) на вопрос:
Гость
// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите её версию!
begin
var a:=ArrRandom(25,20,100); a.Println;
Writeln('S=',a.Where(x->x mod 3=0).Sum)
end.
Пример
38 51 63 80 69 79 64 96 76 62 33 94 52 61 90 35 85 85 39 33 80 66 34 66 86
S=606
Не нашли ответ?
Похожие вопросы