Cod sursa(job #996041)

Utilizator sulzandreiandrei sulzandrei Data 10 septembrie 2013 20:39:43
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.21 kb
program ss;
var a,b:integer;
f:text;
begin
 assign(f,'adunare.in'); reset(f);
 readln(f,a);
 readln(f,b);
 close(f);
 assign(f,'adunare.out'); reset(f); rewrite(f);
 writeln(f,a+b);
 close(f);
end.