Cod sursa(job #822141)

Utilizator atatomirTatomir Alex atatomir Data 22 noiembrie 2012 22:23:08
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.21 kb
Raporteaza aceasta sursa 
var a,b,s:longint;
    f:text;
begin
  assign(f,'adunare.in'); reset(f);
  readln(f,a);
  readln(f,b);
  close(f);
  assign(f,'adunare.out'); rewrite(f);
  s:= a+b;
  write(f,s);
  close(f);

end.