Cod sursa(job #352294)

Utilizator marcelcodreaCodrea Marcel marcelcodrea Data 30 septembrie 2009 23:35:41
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.25 kb
program x1;
var

i : integer;
a : integer;
b : integer;
f,g : text;

begin


Assign(f,'adunare.in');
Assign(g,'adunare.out');
rewrite(g);
reset(f);
//write(g,'223');
read(f,a);
readln(f,b);
writeln(g,a+b);
close(g);
a := 1;

end.