Помогите решить задачу по информатике! Очень надо

const n=8; m=6;var a:array[1..n,1..m] of integer;i,j:integer;beginfor i:=1 to n do begin for j:=1 to m do  begin  a[i,j]:=j;  write(a[i,j]:3);  end; writeln; end;end.Результат:  1  2  3  4  5  6  1  2  3  4  5  6  1  2  3  4  5  6  1  2  3  4  5  6  1  2  3  4  5  6  1  2  3  4  5  6  1  2  3  4  5  6  1  2  3  4  5  6