Cod sursa(job #112811)

Utilizator zeR0_zero unu zeR0_ Data 7 decembrie 2007 21:04:40
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.22 kb
Raporteaza aceasta sursa 
var f,g:text;
    a,b:longint;
begin
     assign(f,'adunare.in');
     reset(f);
     assign(g,'adunare.out');
     rewrite(g)
     readln(f,a);
     read(f,b);
     write(g,a+b);
     close(f);
     close(g);
end.