В двумерном массиве нечетные элементы увеличить на 10,а остальные уменьшить на 10

const n=4; m=5; var a:array[1..n,1..m] of integer;i,j:integer; beginRandomize;writeln('Исходный массив:');for i:=1 to n do begin for j:=1 to m do begin a[i,j]:=random(51); write(a[i,j]:4); end;writeln;end;writeln;for i:=1 to n do  for j:=1 to m do if a[i,j] mod 2 <> 0  then a[i,j]:=a[i,j]+10 else a[i,j]:=a[i,j]-10;writeln('Измененный массив:');for i:=1 to n do begin for j:=1 to m do write(a[i,j]:4); writeln;end;end.Пример:Исходный массив:  7 49 39 28 43 27 26 10 25 20 34 0 1 0 24 18 36 42 21 39 Измененный массив: 17 59 49 18 53 37 16 0 35 10 24 -10 11 -10 14  8 26 32 31 49