Cod sursa(job #111548)

Utilizator bogd@nLocovei Bogdan bogd@n Data 30 noiembrie 2007 15:01:29
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.22 kb
Raporteaza aceasta sursa 
Program p1;
Var a,b:LongInt;
    fin,fout:text;
Begin
  Assign(fin,'adunare.in'); Reset(fin);
  Assign(fout,'adunare.out'); Rewrite(fout);
  ReadLn(fin,a,b);
  WriteLn(fout,a+b);
  Close(fin);
  Close(fout);
End.