vara:array[1..10,1..10] of integer;i,j:integer;begin{здесь надо задать массив.Как пример задания случайного массива: for i:=1 to 10 do for j:=1 to 10 do begin a[i,j]:=random(10)+1; end;} for i:=1 to 10 do for j:=1 to 10 do begin if a[i,j]>20 then write(a[i,j]) end;end.