Cod sursa(job #248843)
| Utilizator |  Cioc Stefan butler1234 |
Data | 26 ianuarie 2009 22:00:10 |
|---|---|---|---|
| Problema | A+B | Scor | 0 |
| Compilator | fpc | Status | done |
| Runda | Arhiva de probleme | Marime | 0.21 kb |
program suma;
var a,b,s:integer;
f1,f2:text;
begin
assign(f1,'suma.in'); reset(f1);
assign(f2,'suma.out'); rewrite(f2);
readln(f1,a);
readln(f1,b);
s:=a+b;
write(f2,s);
close(f1);
close(f2);
end.