Cod sursa(job #363911)

Utilizator SpiderManSimoiu Robert SpiderMan Data 14 noiembrie 2009 23:18:30
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.26 kb
Raporteaza aceasta sursa 
type suma=-maxlongint..2000000000;
var s:suma;
    a,b:longint;
    f,g:text;
 begin
  assign(f,'adunare.in');
  reset(f);
  readln(f,a);
  readln(f,b);
  close(f);
  assign(g,'adunare.out');
  rewrite(g);
  s:=a+b;
  write(g,s);
  close(g);
 end.