Cod sursa(job #139568)

Utilizator cezarbotolanbotolan cezar cezarbotolan Data 20 februarie 2008 13:47:32
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.19 kb
program adunare;
var a,b,s:integer; f,g:text
begin
  assign(f,'adunare.in');reset(f);
  assign(g,'adunare.out');rewrite(g);
  readln(f,a,b);
  s:=a+b;
  writeln(g,s);
  close(g);
end.