Cod sursa(job #365130)

Utilizator bennyDogaru Beniamin benny Data 17 noiembrie 2009 22:18:11
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.27 kb
Raporteaza aceasta sursa 
program adunare;
uses wincrt;
var a,b,c:longint;
    f:text;
begin
     assign(f,'adunare.in');
     reset(f);
     readln(f,a);
     readln(f,b);
     close(f);
     c:=a+b;
     assign(f,'adunare.out');
     rewrite(f);
     writeln(f,c);
     close(f);
end.