Cod sursa(job #600475)
Utilizator | Data | 1 iulie 2011 21:56:09 | |
---|---|---|---|
Problema | A+B | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.26 kb |
Program adunarea;
var a,b : longint;
fi , fo : text;
begin
assign(fi,'Adunare.in');
reset(fi);
read(fi,a);
read(fi,b);
close(fi);
assign(fo,'Adunare.out');
rewrite(fo);
write(fo,a+b);
close(fo);
end.