Составить программу на паскале. заполнить массив размером 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

danilohca danilohca    1   18.12.2019 09:09    0

Ответы
Pollymironova Pollymironova  10.10.2020 21:25

===== 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.


Составить программу на паскале. заполнить массив размером 6 x 6 по прави-лу, используя процедуру. 1
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика