дан двумерный массив размером 3 на 4. найти количество чисел, кратных 5 и заканчивающихся на 0. вывести элементы массива на экран.

===== 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 не нужна.

Дважды подряд записать трехзначное число — это значит умножить его на 1001. Умножив на 1000, мы получаем исходное число с тремя нулями. Добавляем к полученному числу еще один раз исходное число. Получается число, в записи которого дважды повторяются цифры исходного числа.
Последовательно разделить на 13, 11 и 7 – значит разделить число на произведение 13 * 11* 7, которое равно 1001.
Получается, что мы число сначала умножаем на 1001, а после делим на 1001. Естетственно, у нас получится исходное число:
(n * 1001) / (13 * 11 * 7) = (n * 1001) / 1001 = n.

Дважды подряд записать трехзначное число — это значит умножить его на 1001. Умножив на 1000, мы получаем исходное число с тремя нулями. Добавляем к полученному числу еще один раз исходное число. Получается число, в записи которого дважды повторяются цифры исходного числа.
Последовательно разделить на 13, 11 и 7 – значит разделить число на произведение 13 * 11* 7, которое равно 1001.
Получается, что мы число сначала умножаем на 1001, а после делим на 1001. Естетственно, у нас получится исходное число:
(n * 1001) / (13 * 11 * 7) = (n * 1001) / 1001 = n.