anchor.diff:  close(f); { Inchidem fisierul }
   
   { Initializam max cu cea mai mare valoare dintre primele doua
  -  (v[1] si v[2]) si pre_max cu cea mai mica                 }
  +  ('v[1]' si 'v[2]') si pre_max cu cea mai mica                 }
   if v[1] > v[2] then
       begin
       max := v[1];
  
positive.code:     pre_max := v[1];
      end;
  
  { Parcurgem vectorul de la 3 la n sa vedem daca gasim valori mai mari ca max }
  for i := 3 to n do
      if v[i] > max then
          begin
          pre_max := max; { pre_max ia valoarea curenta a lui max }
          max := v[i]; { max ia cea mai mare valoare gasita pana acum }
          end;
  
  { Scriem valorie in fisierul unu.out }
  write(g, max);
  write(g, ' ');
  write(g, pre_max);
  
negative.code: reset(f);
  rewrite(g);
  
  { Citim 'n'-ul din fisier }
  readln(f, n);
  
  { Citim cele n numere }
  