Составить программу на паскале. заполнить массив размером 6 x 6 по прави-лу, используя процедуру.
1 2 3 4 5 6
0 1 2 3 4 5
0 0 1 2 3 4
0 0 0 1 2 3
0 0 0 0 1 2
0 0 0 0 0 1

Question

Информатика: Составить программу на паскале. заполнить массив размером 6 x 6 по прави-лу, используя процедуру. 1 2 3 4 5 6 0 1 2 3 4 5 0 0 1 2 3 4 0 0 0 1 2 3 0 0 0 0 1 2 0 0 0 0 0 1

mokantatiana · Answer

===== PascalABC.NET =====procedure Fill(var a: array[,] of integer);begin  var n := a.RowCount;  a := MatrGen(n, n, (i, j) - i j ? 0 : j - i + 1);end;begin  var M := new integer[6, 6];  Fill(M);  M.Println(2)end....