Cod sursa(job #449856)

Utilizator DilaneanDilanean Arman Dilanean Data 6 mai 2010 23:10:48
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.2 kb
Raporteaza aceasta sursa 
program P6;
var a,b:integer;
    f,g:text;
begin
  assign(f,'adunare.in');
  reset(f);
  readln(f,a,b);
  assign(g,'adunare.out');
  rewrite(g);
  writeln(g,a+b);
  close(f); close(g);
end.