Cod sursa(job #110984)

Utilizator darkmanalexandru catalisan darkman Data 28 noiembrie 2007 11:16:59
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.23 kb
program suma;
var a,b,s:longint;
begin
  assign(input,'adunare.in'); reset(input);  readln(a); read(b);
  s:=a+b;
  assign(output,'adunare.out');
  rewrite(output);
   write(s);
  close(input); close(output);
  readln;
  end.