Cod sursa(job #1103614)
Utilizator | Data | 9 februarie 2014 21:05:38 | |
---|---|---|---|
Problema | A+B | Scor | 100 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.26 kb |
program p3;
var fi, fo : text;
a, b, x : integer;
begin assign(fi,'adunare.in');
reset(fi);
read(fi,a,b);
close(fi);
assign(fo,'adunare.out');
rewrite(fo);
x:=a+b;
writeln(fo,x);
close(fo);
end.