Cod sursa(job #76673)
| Utilizator |  Bunget Alexandru alexeu |
Data | 10 august 2007 19:15:26 |
|---|---|---|---|
| Problema | A+B | Scor | 100 |
| Compilator | fpc | Status | done |
| Runda | Arhiva de probleme | Marime | 0.19 kb |
program p1;
var f:text;
a,b,s:longint;
begin
assign(f,'adunare.in');reset(f);
read(f,a);
readln(f,b);
close(f);
s:=a+b;
assign(f,'adunare.out');rewrite(f);
write(f,s);
close(f);
end.