Cod sursa(job #575828)

Utilizator razvanm2kMiklos Alexandru Razvan razvanm2k Data 8 aprilie 2011 19:31:43
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.29 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 ,a+b);
               readln;
         close(f);
             end.