Cod sursa(job #2817083)

Utilizator nolokDragomir Andrei Theodor Paul nolok Data 12 decembrie 2021 19:58:28
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.25 kb
Raporteaza aceasta sursa 
PROGRAM AplusB;

VAR
  Fin, Fout: TextFile;
  A, B: DWord;

BEGIN
  Assign(Fin, 'adunare.in');
  Assign(Fout, 'adunare.out');
  Reset(Fin);
  Rewrite(Fout);

  Readln(Fin, A);
  Readln(Fin, B);
  Writeln(Fout, A + B);

  Close(Fin);
  Close(Fout);
END.