Cod sursa(job #1996803)
Utilizator | Data | 2 iulie 2017 16:54:37 | |
---|---|---|---|
Problema | A+B | Scor | 100 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.24 kb |
program p1;
uses crt;
var fi, fo:text;
a,b,s:integer;
begin
clrscr;
assign(fi,'adunare.in');
assign(fo,'adunare.out');
reset(fi);
rewrite(fo);
readln(fi,a);
readln(fi,b);
s:=a+b;
writeln(fo,s);
close(fi);
close(fo);
end.