pascal 2dimensi menggunakan array

index array dua dimensinberjumlah dua buah untuk baris dan kolom.
array dua dimensi dapat dilakukan dengan:

1. perkalian;
2. penjumlahan; dan
3. penguran.

contoh dari dua dimensi perkalian adalah:

program matrix;
uses wincrt;
type ary: array [1..10,1..10] of integer;
var
   x1,x2: ary;                                                      
   i,j: integer;

   procedure input;
   begin
        for i:= 1 to 3 do
        begin
             for j:= 1 to 4 do
             begin                              
                  write('A[',i,',',j,']=');readln(x1[i,j]);
   end;
        end;

            for i:= 1 to 3 do
            begin
                 for j:= 1 to 4 do
                 begin
                      write('B[',i,',',j,']=');readln(x2[i,j]);
            end;
        end;
   end;

   procedure jumlah (m1,m2:ary);
   var
      hasil: ary;
      begin
           for i:= 1 to 3 do
           begin
                for j:= 1 to 4 do
                begin
                     hasil[i,j]:= m1[i,j] + m2[i,j];
                end;
           end;

           writeln('hasil penjumlahan matrix');
           for i:= 1 to 3 do
           begin
                for j:= 1 to 4 do
                begin
                     write('hasil[',i,',',j,']=');
                     writeln(hasil[i,j]);
                end;
           end;
      end;

   begin
        input;
        jumlah(x1,x2);
   end.

penjumlahan matrix berprinsip pada penjumlahan suatu nilai yang berada pada baris dan kolom yang sama. ini juga berarti penjumlahan matrix hanya dapat dilakukan pada suatu data /bilangan yang mempunyai index yang sama dalam array.