Все
Математика
Алгебра
Геометрия
Литература
Русский язык
Истоки
Краеведение
Французский язык
Литературное чтение
Астрономия
Природоведение
Родной край
Немецкий язык
Технология
Физика
Английский язык
Обществознание
Химия
Биология
История
О`zbek tili
Окружающий мир
Естествознание
География
Украинский язык
Информатика
Украинская литература
Казахский язык
Физкультура и спорт
Экономика
Музыка
Право
Белорусский язык
МХК
Кубановедение
ОБЖ
Психология
Кыргыз тили
Другие предметы
Показать все предметы
Shalok
21.04.2021, 04:48
Информатика

Дана матрица размера m×n. Найти ее максимальный элемент. Pascal ABC

Знаешь ответ?

Чтобы оставить ответ, или зарегистрируйтесь.

Ответ или решение 1
Филиппа
Var a:array[1..100,1..100] of integer; b, i, j:integer; begin write('Размеры матрицы: '); readln(m,n); for i:=1 to m do for j:=1 to n do readln(a[i,j]); b:=a[1,1]; for i:=1 to m do for j:=1 to n do if a[i,j]>b then b:=a[i,j]; writeln('Максимальный элемент вашей матрицы равен ',b); end.