Подсчитать число нулевых элементов для матриц a(n,m) и b(m,n),где m=3,n=4... - Pascal
Формулировка задачи:
Подсчитать число нулевых элементов для матриц a(n,m) и b(m,n),где m=3,n=4. если не сложно решите п л и з!!!очень прошу!
Решение задачи: «Подсчитать число нулевых элементов для матриц a(n,m) и b(m,n),где m=3,n=4...»
textual
Листинг программы
const m=3;n=4; type mas=array[1..4,1..4] of integer; procedure InPutMatrix (n,m:integer; var a:mas); var i,j:integer; begin randomize; for i:=1 to n do begin for j:=1 to m do begin a[i,j]:=random(5); write(a[i,j]:4); end; writeln; end; end; function CounT (n,m:integer; a:mas):integer; var i,j,k:integer; begin k:=0; for i:=1 to n do for j:=1 to m do if a[i,j]=0 then inc(k); count:=k; end; var a,b:mas; begin writeln('A'); InPutMatrix(n,m,a); writeln('B'); InPutMatrix(m,n,b); writeln(CounT(n,m,a)); writeln(CounT(m,n,b)); end.
Объяснение кода листинга программы
- В коде используется язык программирования Pascal.
- Задана постановка задачи: подсчитать число нулевых элементов для матриц a(n,m) и b(m,n), где m=3,n=4.
- Объявлены следующие константы и типы данных:
- const m=3; n=4; - объявление констант m и n, представляющих размеры матриц.
- type mas=array[1..4,1..4] of integer; - объявление типа данных mas, представляющего собой массив размером 4x4 целых чисел.
- Выведена информация о матрице a размером 4x4.
- Выведена информация о матрице b размером 4x4.
- Вызвана функция CounT(n,m,a), которая подсчитывает число нулевых элементов в матрице a.
- Вызвана функция CounT(m,n,b), которая подсчитывает число нулевых элементов в матрице b.
- Функция InPutMatrix(n,m:integer; var a:mas) используется для ввода информации о матрице a.
- Функция CounT(n,m:integer; a:mas) используется для подсчета числа нулевых элементов в матрице a.
- Введенные матрицы a и b являются одномерными массивами, размещенными в памяти последовательно, начиная с адреса a[1][1].
- При вызове функции InPutMatrix первый аргумент n указывает количество строк матрицы a, а второй аргумент m указывает количество столбцов матрицы a.
- При вызове функции CounT первый аргумент n указывает количество строк матрицы a, а второй аргумент m указывает количество столбцов матрицы a.
- При вызове функции CounT аргумент a указывает на матрицу, в которой необходимо подсчитать число нулевых элементов.
- В цикле функции InPutMatrix происходит заполнение матрицы a случайными числами от 0 до 4.
- В цикле функции CounT происходит обход всех элементов матрицы a и подсчет числа нулевых элементов.
- Результат подсчета числа нулевых элементов в матрице a сохраняется в переменной count.
- При вызове функции CounT для матрицы b происходит аналогичный подсчет числа нулевых элементов.
- Результат подсчета числа нулевых элементов в матрице b сохраняется в переменной count.
- Вывод значения переменной count на экран.
- Вывод информации о матрице b.