Cod sursa(job #685661)

Utilizator CristeaCristea Victor Cristea Data 21 februarie 2012 08:41:17
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.2 kb
Raporteaza aceasta sursa 
var fi,fo:text;
      a,b:longint;
begin
 assign(fi,'adunare.in');
 reset(fi);
 assign(fo,'adunare.out');
 rewrite(fo);
 readln(fi,a);
 read(fi,b);
 write(fo,a+b);
 close(fi);
 close(fo);
end.