Помогите, пожалуйста, к девяти нужно задание, где написано д/з

Помогите, пожалуйста, к девяти нужно задание, где написано д/з
Гость
Ответ(ы) на вопрос:
Гость
// PascalABC.NET 3.2, сборка 1385 от 14.02.2017 // Внимание! Если программа не работает, обновите версию! begin   var n:=ReadInteger('Количество строк в массиве:');   var m:=ReadInteger('Количество столбцов в массиве:');   Writeln('*** Исходный массив [',n,',',m,'] ***');   var a:=MatrRandom(n,m,-99,99);   a.Println(4); Writeln(4*a.ColCount*'-');   a.Cols.Select(x->Format('{0,4}',x.Min)).Print('');   Writeln(' - минимальные');   a.Cols.Select(x->Format('{0,4}',x.Max)).Print('');   Writeln(' - максимальные'); end. Пример Количество строк в массиве: 6 Количество столбцов в массиве: 9 *** Исходный массив [6,9] ***   21  65  34  -6 -67  16 -68 -41 -82  -90 -31   6  38  34 -42  15  57 -21   55  72 -34  32 -77  -4 -16  66 -71   47  67 -75 -92   0  82  72  41  29    7 -19  94 -12 -42 -27   7 -39  41   60 -90  68  77  27 -59 -21  36  32 ------------------------------------  -90 -90 -75 -92 -77 -59 -68 -41 -82 - минимальные   60  72  94  77  34  82  72  66  41 - максимальные
Не нашли ответ?
Ответить на вопрос
Похожие вопросы