Cod sursa(job #265021)

Utilizator alinusalin idomir alinus Data 23 februarie 2009 09:31:02
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.22 kb
var A, B, C : longint;
    fi, fo : text;

Begin
  assign(fi,'adunare.in'); reset(fi);
  assign(fo,'adunare.out'); rewrite(fo);

  readln(fi, A, B);

  C := A + B;
  writeln(fo, C);

  close(fi);
  close(fo);
End.