Cod sursa(job #1757285)
Utilizator | Data | 14 septembrie 2016 19:51:39 | |
---|---|---|---|
Problema | A+B | Scor | 100 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.23 kb |
Program adunare;
Var
a,b:longint;
f1,f2:text;
Begin
Assign (f1,'adunare.in');
Reset (f1);
Assign (f2,'adunare.out');
Rewrite(f2);
Readln (f1,a);
Readln (f1,b);
Writeln (f2,a+b);
Close (f1);
Close (f2);
end.