help

[8-BIT]

помогите пожалуйста написать элемент программы-Вычесть из элементов четных строк значения элементов нечетных строк и вывести на печать 4 последние строки(вторую часть задания я сделал)

[promises]

и в чем конкретно проблема?

[Haku-jin]

вторую часть задания я сделал

вывел на экран?)

в каком виде входные данные представлены?

[TiPo]

На быструю руку(pascal):

var
n, i, j:integer;
a:array [1..20, 1..20] of integer;
begin
readln(n);
for i:=1 to n do begin
for j:=1 to n do begin
read(a[i,j]);
if i mod 2=0 then a[i,j]:=a[i,j]-a[i-1,j];
end;
writeln;
end;
for i:=n-3 to n do begin
for j:=1 to n do write(a[i,j], ' ');
writeln;
end;
write('Press Enter'); readln;
end.

program u4;

n можно объявить как

const n = 20;

тогда

a:array [1..n, 1..n] of integer