Глупая надежда спрашивать решение… но все же…

1) var a: array [1… 20] of integer; i: integer; 2) randomize; for i: =1 to 20 do a[i]: =random (90)+10; 3) n: =20; for i: =1 to n-1 do for j: =i+1 to n do if a[i]