Cod sursa(job #1241188)

Utilizator blade314Melnic Cristina blade314 Data 12 octombrie 2014 21:57:59
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.24 kb
Raporteaza aceasta sursa 
Program adunare;
  var a,b:integer;
      fi,fo:text;
begin
  assign(fi,'adunare.in');
  reset(fi);
  assign(fo,'adunare.out');
  rewrite(fo);
  readln(fi,a);
  readln(fi,b);
  writeln(fo,'suma este= ', a+b);
  close(fo);
end.