
Dianawyn
6 год назад
Дан одномерный массив состоящий из 10 элементов.Найти кол во чисел кратных 7
ОТВЕТЫ

Артемонович
Aug 5, 2019
//PascalABC.Net 3.1.0.1200
begin
var a := ArrRandomInteger(10, 1, 100);
writeln(a.Where(x -gt; x mod 7 = 0).Count);
end.
begin
var a := ArrRandomInteger(10, 1, 100);
writeln(a.Where(x -gt; x mod 7 = 0).Count);
end.
6
Смежные вопросы: