begin
  var a := SeqRandom(10,1,10);
  a.Println.Sorted.Println.Distinct.Println;
end.