Cod sursa(job #380571)

Utilizator MihaicorneliuMihai Pojar Mihaicorneliu Data 6 ianuarie 2010 18:31:34
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.21 kb
program suma;
var a,b,s:longint;
    i,o:text;
begin
  assign(i,'adunare.in');
  assign(o,'adunare.out');
  reset(i);
  rewrite(o);
  readln(i,a);
  readln(i,b);
  s:=a+b;
  writeln(o,s);
  close(o)
end.