Cod sursa(job #973112)

Utilizator ctlin04UAIC.VlasCatalin ctlin04 Data 13 iulie 2013 14:50:50
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.23 kb
Raporteaza aceasta sursa 
Program p1;
 var a,b,c:longint;
     cit,scr:text;
begin
 assign(cit,'adunare.in');
  assign(scr,'adunare.out');
 reset(cit); rewrite(scr);
  readln(cit,a); read(cit,b);
  c:=a+b;
  write(scr,c);
  close(cit);
  close(scr);
end.