Мне написать сообщение о роли информатики в узбекистане . заранее

Question

Информатика: Мне написать сообщение о роли информатики в узбекистане . заранее

Niiiiklou · Accepted Answer

//PascalABC.Net 3.0, сборка 1064 type   IntArray = array of integer; var   rows, cols: integer;   M: array of IntArray; begin   Write( Количество строк и столбцов матрицы: ); Read(rows, cols);   var Avg: array of double := new double[cols];   M := new IntArray[rows];   SetLength(Avg, cols);   for var i := 0 to rows - 1 do   begin     M[i] := ArrRandom(cols, -25, 25);     M[i].Println(#9)   end;   for var j := 0 to cols - 1 do     Avg[j] := Range(0, rows - 1).Select(x - M[x, j]).Average;   Writeln(...

MOGZ ответил