const n =20
var a: array [1..n] of integer
i,max,maxi,min,mini:integer
begin
write('Массив')
for i:=random(101)+50
write (a[i],' ')
end;
