{---------------------------------------------------------------------
 - Subiect:
   Se considera data curenta exprimata prin trei numere naturale Ac, Lc, Zc,
   reprezentand, respectiv, anul, luna si ziua, precum si data nasterii 
   unei persoane, exprimata la fel prin trei numere An, Ln, Zn.

 - Cerinta:
   Sa se calculeze varsta persoanei respective in numar de ani impliniti.

 - Intrare:
   Numerele naturale Ac, Lc, Zc, An, Ln, Zn se introduc de la tastatura.

 - Iesire:
   Numarul natural V, care reprezinta varsta persoanei in numar de ani
   impliniti, se afiseaza la ecran.

 - Exemplu:
      Intrare: Ac = 2008    An = 1989    
               Lc =    2    Ln =    3    
               Zc =   12    Zn =   27     

      Iesire: 18
 ---------------------------------------------------------------------}


Program Varsta;
uses crt;
var   Ac, Lc, Zc, An, Ln, Zn, V: Word;
begin
   clrscr;
   write('Ac = ');readln(Ac);
   write('Lc = ');readln(Lc);
   write('Zc = ');readln(Zc);

   write('An = ');readln(An);
   write('Ln = ');readln(Ln);
   write('Zn = ');readln(Zn);
   
   V := Ac - An;
   if (Lc < Ln) or (Zc < Zn) then dec(V); { Inca nu a fost ziua de nastere }
   Writeln(V);
   readkey;
end.