Cod sursa(job #26084)

Utilizator aretzu_marianAretu Marian aretzu_marian Data 5 martie 2007 10:07:19
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.2 kb
Raporteaza aceasta sursa 
var f,g:text;
    a,b:integer;
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.