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