Cod sursa(job #2229605)
Utilizator | Data | 7 august 2018 16:07:27 | |
---|---|---|---|
Problema | A+B | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.2 kb |
program aplusb;
var a,b,s:integer;fi,fo:text;
begin
assign(fi, 'fin.txt');
assign(fo, 'fout.txt');
reset(fi);
readln(fi,a,b);
s:=a+b;
rewrite(fo);
writeln(fo,s);
close(fi);
close(fo);
end.