Поиск наибольшего элемента в двумерном массиве
Программа на языке Паскаль для поиска наибольшего элемента и определения номера строки, в которой он находится.
Введение
Двумерные массивы часто используются при разработке программ, требующих обработки большого количества данных. В данной статье будет рассмотрена задача поиска наибольшего элемента в таком массиве.
Алгоритм решения
- Зададим двумерный массив
arr
и инициализируем его значениями. - Переберем все строки массива с помощью переменной
i
. - Для каждой строки найдем наибольший элемент с помощью переменных
max_element
иmax_index
. - Выведем на экран номер строки, в которой находится наибольший элемент.
Пример кода на языке Паскаль
program MaxElementInArray;
const
rows = 5;
columns = 5;
var
arr: array [1..rows, 1..columns] of integer;
i, j, max_element, max_index: integer;
begin
// Инициализируем массив значениями
arr[1][1] := 5;
arr[1][2] := 10;
arr[1][3] := 7;
arr[1][4] := 2;
arr[1][5] := 9;
arr[2][1] := 3;
arr[2][2] := 6;
arr[2][3] := 1;
arr[2][4] := 4;
arr[2][5] := 8;
// ...
// Начальные значения переменных
max_element := arr[1][1];
max_index := 1;
// Перебираем строки массива
for i := 1 to rows do
begin
// Ищем наибольший элемент в текущей строке
for j := 1 to columns do
begin
if arr[i][j] > max_element then
begin
max_element := arr[i][j];
max_index := i;
end;
end;
end;
// Выводим результаты
writeln('Наибольший элемент: ', max_element);
writeln('Номер строки с наибольшим элементом: ', max_index);
readln;
end.
Описание результата
В результате выполнения программы будет выведено значение наибольшего элемента в массиве, а также номер строки, в которой он находится.
Например, для данного массива:
5 10 7 2 9
3 6 1 4 8
Результат будет таким:
Наибольший элемент: 10
Номер строки с наибольшим элементом: 1
Заключение
Программа на языке Паскаль для поиска наибольшего элемента в двумерном массиве позволяет эффективно обрабатывать большие объемы данных и находить нужные значения.
- sky-wall.ru/uploads/source/2015/03/a3c9aa2b8ef1e472e9b9e47c27c9de6c.jpg
- Мстители: Война Бесконечности - впечатляющая сага о последней битве
- Превью оригинальной статьи на sky-wall.ru/previewOriginal/415
- Lexus IS-F Sedan: Тюнинг + Природа + Закат
- Шарлиз Терон: звезда Голливуда и икона стиля
- Поиск наибольшего элемента в двумерном массиве