Cod sursa(job #93964)

Utilizator lucaz0rLuca Liviu lucaz0r Data 20 octombrie 2007 23:30:00
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.24 kb
Raporteaza aceasta sursa 
program adunare;
var a,b,c:longint;
    f,g:text;
begin
  assign (f,'adunare.in');
  reset (f);
  readln (f,a);
  readln (f,b);
  c:=a+b;
  assign (g,'adunare.out');
  rewrite (g);
  write (g,c);
  close (f) ;  close (g);
  end.