Двумерные массивы. Функции.

[Marina_99]

Всем доброго времени суток!

Заполнение двумерного массива по определенным правилам.

Заполнить двумерный массив так, как представлено ниже. Написать функцию, выводящую
массив на экран.

109 … 13 1
110 … 14 2
111 … 15 3
… … … … ...
120 … 24 12

12 строк
10 столбцов

не могу придумать как задать.

[digitalis]

  yyy: array [1..12,1..10] of integer ;
   n := 1 ;
   for i := 10 downto 1 do
     for j := 1 to 12 do
       begin
          yyy[j,i] := n ;
          Inc (n)
       end ;