Cod sursa(job #600881)
Utilizator | Data | 3 iulie 2011 23:45:44 | |
---|---|---|---|
Problema | A+B | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.2 kb |
var a,b,c:longint; F:text;
Begin
assign(F, 'adunare.in');
reset(F);
readln(a);
read(b);
close(F);
assign(F, 'adunare.out');
rewrite(F);
c:=a+b;
writeln( c);
readln;
end.