Cod sursa(job #494655)

Utilizator CalyCalin Tamas Caly Data 22 octombrie 2010 15:21:03
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.2 kb
Raporteaza aceasta sursa 
var a,b,s:integer;
    t:text;


begin
 assign(t,'adunare.in'); reset(t);
 readln(t,a);
 readln(t,b);
 close(t);

 s:=a+b;

 assign(t,'adunare.out'); rewrite(t);
 writeln(t,s);
 close(t);
end.