Cod sursa(job #5488)

Utilizator ilandIliasenco Andrei iland Data 12 ianuarie 2007 19:41:21
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.2 kb
Raporteaza aceasta sursa 
program a;
var f,g:text;
    n,m:extended;
begin
  assign(f,'ain.txt');
  assign(g,'aout.txt');
  reset(f);
  rewrite(g);
  read(f,n);
  read(f,m);
  write(g,n+m);
  close(f);
  close(g);
end.