Cod sursa(job #110991)

Utilizator darkmanalexandru catalisan darkman Data 28 noiembrie 2007 11:36:32
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.21 kb
Raporteaza aceasta sursa 
program suma;
var a,b,s:longint;
f:text;
begin
  assign(f,'adunare.in'); reset(f); readln(f,a); read(f,b);
  s:=a+b;
  close(f);
  assign(f,'adunare.out');
  rewrite(f);
   write(f,s);
   close(f);
  end.