Вопрос по информатике:
Найти наибольший элемент массива размером МхN, элементы которого задаются датчиком случайных чисел на интервале [-25;19].
- 01.01.2018 23:10
- Информатика
- remove_red_eye 2165
- thumb_up 23
Ответы и объяснения 1
// PascalABC.NET 3.1, сборка 1213 от 04.04.2016
begin
var m,n:integer;
Write('Введите n и m: '); Read(n,m);
var a:=MatrixRandom(n,m,-25,19);
var max:=-26; // меньше возможного меньшего
for var i:=0 to n-1 do begin
for var j:=0 to m-1 do begin
Write(a[i,j]:4);
if a[i,j]>max then max:=a[i,j]
end;
Writeln
end;
Writeln('Максимальный элемент равен ',max)
end.
Тестовое решение:
Введите n и m: 5 8
-25 -3 -20 -8 -4 -21 9 -16
0 17 9 -22 10 15 -2 11
-1 17 -12 -15 0 -7 17 -16
-22 -9 -18 4 -4 -9 4 -16
-8 -17 -21 11 -4 -7 -12 13
Максимальный элемент равен 17
- 02.01.2018 09:55
- thumb_up 35
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.