Cod sursa(job #147848)

Utilizator EstarDaian Dragos Estar Data 3 martie 2008 17:29:06
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.21 kb
var s,a,b:longint;

f,g:text;

begin

assign(f,'adunare.in');

reset(f);

assign(g,'adunare.out');

rewrite(g);

readln(f,a);

readln(f,b);

s:=a+b;

writeln(g,a+b);

close(f);

close(G);
end.