Cod sursa(job #575838)

Utilizator razvanm2kMiklos Alexandru Razvan razvanm2k Data 8 aprilie 2011 19:41:30
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.31 kb
Raporteaza aceasta sursa 
var a,b,s:integer;
   var f:text;
     begin

     assign(f,'adunare.in');
        reset(f);

        readln(f,a);

           readln(f,b);
         close(f);

               s:=a+b;


         assign(f,'adunare.out');
             rewrite(f);
          write(f,a+b);

         close(f);
           readln;
         end.