Cod sursa(job #164862)

Utilizator bogdan005Aldescu Bogdan bogdan005 Data 24 martie 2008 21:41:03
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.24 kb
Raporteaza aceasta sursa 
 var a,b:longint;
  f:text;
    begin
         assign(f,'adunare.in'); reset(f);
         readln(f,a); readln(f,b);
         close(f);
         assign(f,'adunare.out'); rewrite(f);
         writeln(f,a+b);
         close(f);
   end.