Вопрос по информатике:
Pascal Дан двумерный массив Найти наименьший елемент побочной диагонали. Заранее спасибо!
Пожаловаться
- 15.12.2017 09:49
- Информатика
- remove_red_eye 5089
- thumb_up 28
Ответы и объяснения 1
// PascalABC.NET 3.2, сборка 1467 от 02.06.2017
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('Количество строк и столбцов в массиве:');
Writeln('*** Исходный массив ***');
var a:=MatrRandom(n,n,-99,99);
a.Println(4); Writeln(4*n*'-');
var min:=a[0,n-1];
for var i:=1 to n-1 do
if a[i,n-i-1]
end.
Пример
Количество строк и столбцов в массиве: 7
*** Исходный массив ***
-73 45 -54 73 62 -65 27
-42 68 -61 -92 69 -44 73
28 -90 85 10 69 -42 -8
15 12 9 -52 -97 11 61
-9 -68 -2 -93 85 -48 -35
61 -76 -78 91 -23 -15 16
-25 51 -38 60 -19 -22 -3
----------------------------
Минимальный элемент на побочной диагонали равен -76
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('Количество строк и столбцов в массиве:');
Writeln('*** Исходный массив ***');
var a:=MatrRandom(n,n,-99,99);
a.Println(4); Writeln(4*n*'-');
var min:=a[0,n-1];
for var i:=1 to n-1 do
if a[i,n-i-1]
end.
Пример
Количество строк и столбцов в массиве: 7
*** Исходный массив ***
-73 45 -54 73 62 -65 27
-42 68 -61 -92 69 -44 73
28 -90 85 10 69 -42 -8
15 12 9 -52 -97 11 61
-9 -68 -2 -93 85 -48 -35
61 -76 -78 91 -23 -15 16
-25 51 -38 60 -19 -22 -3
----------------------------
Минимальный элемент на побочной диагонали равен -76
Пожаловаться
- 16.12.2017 21:05
- thumb_up 24
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы