Подсчитать количество чётных чисел в каждой строке массива - Free Pascal (290)
Формулировка задачи:
Дан массив. Подсчитать: а). Количество чётных чисел в каждой строке массива. б). Количество отрицательных чисел в каждом столбце массива. в). Количество элементов, расположенных на главной диагонали, значения, которых кратны трём.
Решение задачи: «Подсчитать количество чётных чисел в каждой строке массива»
textual
Листинг программы
for i:=1 to N do if A[i,i]mod 3 = 0 then el_gl_diag_kratn_trem:=el_gl_diag_kratn_trem+1;
Объяснение кода листинга программы
- В цикле от 1 до N выполняется проверка: если A[i,i] делится на 3 без остатка, то
- Переменная el_gl_diag_kratn_trem увеличивается на 1.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д