Cod sursa(job #5047)
| Utilizator |  Valentina Banut valikz |
Data | 9 ianuarie 2007 21:32:52 |
|---|---|---|---|
| Problema | A+B | Scor | 100 |
| Compilator | fpc | Status | done |
| Runda | Arhiva de probleme | Marime | 0.21 kb |
program adunare;
var a,b:integer;
f1,f2:text;
begin
assign(f1,'adunare.in'); reset (f1);
assign(f2,'adunare.out'); rewrite (f2);
readln (f1,a);
readln (f1,b);
writeln(f2,a+b);
close(f1);
close(f2);
end.