Cod sursa(job #600652)

Utilizator RaileanuCristian Raileanu Raileanu Data 2 iulie 2011 18:22:10
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.23 kb
Program ab;
var a,b: longint;
    f1,f2: text;

Begin
     assign(f1, 'adunare.in');
     reset(f1);
     readln(f1,a);
     close(f1);
     assign(f2,'adunare.out');
     rewrite(f2);
     writeln(f2,a+b);
     close(f2);
end.