Cod sursa(job #265007)
Utilizator | Data | 23 februarie 2009 09:24:04 | |
---|---|---|---|
Problema | A+B | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.2 kb |
var A, B : longint;
fi, fo : text;
begin
assign(fi,'adunare.in'); reset(fi);
assign(fo,'adunare.out'); rewrite(fo);
read(fi, A, B);
writeln(A + B);
close(fi);
close(fo);
End.