Print('Элементов, кратных 5 и заканчивающихся нулем:',
a.ElementsByRow.Count(p -> p mod 10 = 0))
end.
Объяснение:
Если число заканчивается нулем, то оно кратно 10. Но 10 = 5·2, поэтому такое число также кратно 5 и 2. Вследствие этого, отдельная проверка на кратность 5 не нужна.
===== PascalABC.NET =====
begin
var a := MatrRandom(3, 4, -99, 99);
a.Println(4);
Print('Элементов, кратных 5 и заканчивающихся нулем:',
a.ElementsByRow.Count(p -> p mod 10 = 0))
end.
Объяснение:
Если число заканчивается нулем, то оно кратно 10. Но 10 = 5·2, поэтому такое число также кратно 5 и 2. Вследствие этого, отдельная проверка на кратность 5 не нужна.