Question

In fisierul ''date.in'', pe primul rand se afla un numar natural mai mic decat 50 iar pe al doilea rand n numere intregi mai mici decat 30000. Scrieti un program care citeste elementele sirului, ordoneaza crescator elementele sirului si le afiseaza in ordine crescatoare in fisierul ''date.out''.

Var V:Array [1..30000] of integer;
      n, i: integer;
      f, g: text;
Begin
Assign (f,'date.in');
Reset (f);
Vreau si eu continuarea de aici incolo :)

Answer 1

Var V:Array [1..30000] of integer;
      n, i: integer;
      f, g: text;
Begin
Assign (f,'date.in');
Reset (f);
1269 Enter space + alt + 3
Num Lock + Page Up
Home + Insert  +    End

Sper ca te-am ajutat !