sortingexample.pp 458 B

123456789101112131415161718192021
  1. uses garrayutils, gutil, gvector;
  2. type vectorlli = specialize TVector<longint>;
  3. lesslli = specialize TLess<longint>;
  4. sortlli = specialize
  5. TOrderingArrayUtils<vectorlli, longint, lesslli>;
  6. var data:vectorlli; n,i:longint;
  7. begin
  8. randomize;
  9. data:=vectorlli.Create;
  10. read(n);
  11. for i:=1 to n do
  12. data.pushback(random(1000000000));
  13. sortlli.sort(data, data.size());
  14. for i:=1 to n do
  15. writeln(data[i-1]);
  16. data.Destroy;
  17. end.