Нужно набрать программу, которая выводит 2 массива и находит сумму элементов этих массивов. «даны два многомерных массива. найти их разность с=а-в.»

Const n =5; type   mas=array[1..n,1..n]of integer; var   a,b: mas;   i,j,sum: integer; begin randomize; sum: =0;   for i: =1 to n do           for j: =1 to n do               a[i,j]: =random(30);   for i: =1 to n do           for j: =1 to n do               b[i,j]: =random(30);   writeln('первый массив: ');   for i: =1 to n do       begin           for j: =1 to n do               write(a[i,j]: 4);       writeln;       end;   writeln;   writeln('второй массив: ');   for i: =1 to n do       begin           for j: =1 to n do               write(b[i,j]: 4);       writeln;       end;   writeln('разность двух массивов a-b: ');   for i: =1 to n do       begin           for j: =1 to n do               begin                   sum: =sum+a[i,j]+b[i,j];                   write(a[i,j]-b[i,j]: 4);               end;               writeln;       end;       writeln('сумма элементов двух массивов: ',sum); end.

Виктор актёр,Том физик,Влад юрист.