Cod sursa(job #12)

Utilizator wefgefAndrei Grigorean wefgef Data 28 noiembrie 2006 03:00:46
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.24 kb
Raporteaza aceasta sursa 
program adunare;
var f:text;
    suma,b:longint;

begin
  assign(f,'adunare.in');reset(f);
    readln(f,suma);
    readln(f,b);
  close(f);
  assign(f,'adunare.out');rewrite(f);
    suma:=suma+b;
    write(f,suma);
  close(f);
end.