Cod sursa(job #223052)

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