Cod sursa(job #654744)

Utilizator BredPitBred Pit BredPit Data 30 decembrie 2011 20:56:52
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.44 kb
{$IFDEF NORMAL}
  {$H-,I-,OBJECTCHECKS-,Q-,R-,S-}
{$ENDIF NORMAL}
{$IFDEF DEBUG}
  {$H-,I+,OBJECTCHECKS+,Q+,R+,S-}
{$ENDIF DEBUG}
{$IFDEF RELEASE}
  {$H-,I-,OBJECTCHECKS-,Q-,R-,S-}
{$ENDIF RELEASE}
program adunare;
var fin,fout:text;
    a,b:integer;

BEGIN
        assign(fin,'adunare.in');reset(fin);
        assign(fout,'adunare.out');rewrite(fout);
        read(fin,a,b);
        writeln(a+b);
        close(fin);close(fout);
END.