Cod sursa(job #223197)

Utilizator vladbalaBalaneanu Vlad vladbala Data 27 noiembrie 2008 15:52:38
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.2 kb
Raporteaza aceasta sursa 
program suma;
var a,b,s:integer;
  f:text;
begin
  assign(f,'adunare.in');reset(f);
  read(f,a,b);
  close(f);
  s:=a+b;
  assign(f,'adunare.out');rewrite(f);
  write(f,s);
  close(f);
end.