Cod sursa(job #365406)

Utilizator SpiderManSimoiu Robert SpiderMan Data 18 noiembrie 2009 16:53:07
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.26 kb
Raporteaza aceasta sursa 
type suma=+maxlongint..20000000000;

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.