Cod sursa(job #381419)

Utilizator balucristianBalu Cristian balucristian Data 10 ianuarie 2010 16:30:26
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.26 kb
Raporteaza aceasta sursa 
var
        a,b,s:longint;
        f,g:text;
begin
        assign(f,'adunare.in');
        reset(f);
        readln(f,a,b);
        close(f);
        assign(g,'adunare.out');
        rewrite(g);
        s:=a+b;
        write(g,s);
        close(g);
end.