Cod sursa(job #380327)
Utilizator | Data | 5 ianuarie 2010 18:41:21 | |
---|---|---|---|
Problema | A+B | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.18 kb |
program xyz;
var b,c:longint;
f:text;
begin
assign (f,'adunare.in');reset(f);
read(b);
read(c);
close(f);
c:=c+b;
assign(f,'adunare.out');rewrite(f);
write(f,c);
end.