Cod sursa(job #1103610)

Utilizator blizarGargaun Veaceslav blizar Data 9 februarie 2014 21:01:50
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.27 kb
Raporteaza aceasta sursa 
program p3;
 var fi, fo : text;
     a, b, x : integer;
begin assign(fi,'adunare.in');
      reset(fi);
      read(fi,a,b);
      close(fi);
      assign(fo,'adunare.out');
      rewrite(fo);
      x:=a+b;
      writeln(fo,'suma=',x);
      close(fo);
end.