Cod sursa(job #707449)

Utilizator dan.paulaDan Paula dan.paula Data 5 martie 2012 21:20:05
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.23 kb
Raporteaza aceasta sursa 
program adunare;

var f,g:text;
	sum,a,b:integer;

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

sum := a + b;

assign(g,'adunare.out');
rewrite(g);
writeln(g,sum);

close(f);
close(g);
end.