Составить программу вычисления суммы элементов, двумерного массива размерностью 9*9?

Var m:array[1 ... 9,1 ... 9] of integer;

s, j, i:integer;

begin

randomize;

s:=0;

For i:=1 to 9 do

For j:=1 to 9 do

m[i, j]:=random (100) + 1;

For i:=1 to 9 do

For j:=1 to 9 do

s:=s+m[i, j];

writeln ('Сумма элементов двумерного массива размерностью 9*9 = ', s) ;

end.