Cod sursa(job #76060)
| Utilizator |  Alexandru Bunget ioalexno1 |
Data | 7 august 2007 18:43:49 |
|---|---|---|---|
| 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.