Дан массив M на N (m и N<=30) Опции

[agressor]

Дан массив m на n (m и n<=30) Добавить строку L .
Найти сумму всех элементов кратных 3.
Матрицу вювести два раза до и после.
Помогите пожалуйста.

[FreeMan]

Добавить строку L. Куда добавить? в массив? вот без строки

Код

uses crt;
const
n=10;
m=10;
var
a:array [1..n,1..m] of word;
var i,j,count:word;
begin
randomize;
for i:=1 to n do
for j:=1 to m do a[i,j]:=random(1000);

for i:=1 to n do begin
for j:=1 to m do write( a[i,j],' ');
writeln;
end;

count:=0;
for i:=1 to n do
for j:=1 to m do if a[i,j] mod 3=0 then inc(count,a[i,j]);

for i:=1 to n do begin
for j:=1 to m do write( a[i,j],' ');
writeln;
end;

writeln;
writeln('summa ',count );
readln;
end.