Cod sursa(job #600652)
| Utilizator | Data | 2 iulie 2011 18:22:10 | |
|---|---|---|---|
| Problema | A+B | Scor | 0 |
| Compilator | fpc | Status | done |
| Runda | Arhiva de probleme | Marime | 0.23 kb |
Program ab;
var a,b: longint;
f1,f2: text;
Begin
assign(f1, 'adunare.in');
reset(f1);
readln(f1,a);
close(f1);
assign(f2,'adunare.out');
rewrite(f2);
writeln(f2,a+b);
close(f2);
end.