Cod sursa(job #182488)
Utilizator | Data | 20 aprilie 2008 22:39:16 | |
---|---|---|---|
Problema | A+B | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.18 kb |
var f:text;
a,b:integer;
begin
assign(f,'adunare.in'); reset(f);
read(f,a); read(f,b);
assign(f,'adunare.out'); rewrite(f);
write(f,a+b);
readln;
end.