Cod sursa(job #833358)

Utilizator SPDionisSpinei Dionis SPDionis Data 12 decembrie 2012 15:08:00
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.23 kb
Raporteaza aceasta sursa 
program Noname1;
var f1,f2:text;
    a,b,s:integer;
begin
  assign(f1,'adunare.in.txt');
  reset(f1);
  readln(f1,a);
  readln(f1,b);
  s:=a+b;
  assign(f2,'adunare.out.txt');
  rewrite(f2);
  writeln(f2,s);
  close(f2);
end.