Есть программисты?помогите составить алгоритм и программу, пожалуйста: Заполнить массив с(34) случайными числами до 38.найти произведение чисел кратных 5. Распечатать массив в строку.
Есть программисты?помогите составить алгоритм и программу, пожалуйста:
Заполнить массив с(34) случайными числами до 38.найти произведение чисел кратных 5. Распечатать массив в строку.
Гость
Ответ(ы) на вопрос:
ГостьВот в этом файле все написано
Гость// PascalABC.NET 3.0, сборка 1088
begin
var a:=ArrRandom(35,1,38);
a.PrintLn;
Writeln(a.Where(x->x mod 5=0).Aggregate((x,y)->x*y))
end.
Тестовое решение:
35 1 3 3 1 19 31 38 31 32 33 10 7 22 21 1 18 17 19 32 21 18 31 30 10 2 23 34 33 23 12 25 12 5 30
393750000
Не нашли ответ?
Похожие вопросы