Написать программу заполнения двумерного массива данными 1 1 12 2 2 3 3 3Паскаль

Question

Написать программу заполнения двумерного массива данными 1 1 12 2 2 3 3 3Паскаль

Comments

На каком языке программирования?

---

Паскаль

Answer 1

var

   arr: array [1..3, 1..3] of Integer;

   i, j: Integer;

begin

   for i := 1 to 3 do

       for j := 1 to 3 do

           arr[i][j] := i;

end.