В одномерном массиве из 25 целочисленных элементов, определить: 1) сумму элементов,...

Question

В одномерном массиве из 25 целочисленных элементов, определить: 1) сумму элементов, кратных 3; 2)кол-во эл-в, стоящих на местах кратных 5

Answer 1

// PascalABC.NET

begin

 var a := ArrRandom(25, -99, 99);

 a.Where(p -> p mod 3 = 0).Sum.Println;

 a[4::5].Count.Print

end.