Пример программы обработки двумерного массива

 

Задача.

Составить программу нахождения максимального среди элементов двумерного массива вещественных чисел. Определить номер строки и номер столбца, на пересечении которых был найден максимальный элемент.

2. Таблица идентификаторов.

№	Наименование переменной	Обозначения в программе
	Имя двумерного массива	a
	Количество строк	n
	Количество столбцов	m
	Индексы массива	I,j
	Значение максимального элемента	max
	Номер строки, где найден максимальный элемент	kmax
	Номер столбца, где найден максимальный элемент	lmax

 

3. Листинг программы.

 

program lab6;

uses

crt;

var

a: array [1...10, 1...10] of real;

i, j, n, m , kmax , lmax: integer;

max :real;

begin

clrscr;

writeln(‘ Введите n<=10 , m<=10 ’);

readln(n,m);

writeln(‘ Введите элементы массива по строкам ’);

for i:=1 to n do

for j:=1 to m do

readln(a[i,j]);

{за максимальный принимается элемент a11 }

max:=a[1,1];

kmax:=1;

lmax:=1;

for i:=1 to n do

for j:=1 to m do

if a[i,j]>max then

begin

max:=a[i,j];

kmax:=i;

lmax:=j;

end;

writeln(‘max=’, max:8:3);

writeln(‘строка - ‘, kmax,’ столбец - ’,lmax);

readln;

end.

 

Вопросы для самоконтроля

 

1. В чем состоит разница между одномерными и двумерными массивами?
2. В каких случаях целесообразно создавать двумерные массивы?
3. Как расположены элементы двумерного массива в памяти компьютера?
4. Как определить количество элементов в двумерном массиве?
5. Как определить размер памяти в байтах, выделенной под хранение двумерного массива?
6. Какая матрица называется квадратной?
7. Что характеризует элементы, расположенные на главной диагонали, над и под главной диагональю?