Cod sursa(job #128923)

Utilizator cristy_marin2006Marin Ionut Cristian cristy_marin2006 Data 28 ianuarie 2008 11:37:26
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.24 kb
Raporteaza aceasta sursa 
program cmmdc;
var a,b,s:integer;
    f,g:text;
begin
        assign(f,'adunare.in');reset(f);
        assign(g,'adunare.out');rewrite(g);
        read(f,a);read(f,b);
        s:=a+b;
        write(g,s);
        close(f);close(g);
end.