Cod sursa(job #237294)
| Utilizator |  Cristian Holdunu CrisstiHD |
Data | 29 decembrie 2008 14:30:30 |
|---|---|---|---|
| Problema | A+B | Scor | 100 |
| Compilator | fpc | Status | done |
| Runda | Arhiva de probleme | Marime | 0.21 kb |
program pascal;
var a,b,s:longint;
f,g:text;
begin
assign (f, 'adunare.in');
assign (g, 'adunare.out');
reset (f);
rewrite (g);
read (f, a, b);
s:=a + b;
write (g, s);
close(f);
close(g);
end.