Cod sursa(job #808257)

Utilizator PomianAurelianPomian Aurelian PomianAurelian Data 6 noiembrie 2012 16:00:20
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.35 kb
Raporteaza aceasta sursa 
{*********************}
{*}Program A_plus_B;{*}
{*********************}

{****} Var a,b:longint;
           f:text;

{----------------------------------------------------------------------------}

{*}Begin{*}
assign(f,'adunare.in');reset(f);
read(f,a,b);close(f);
assign(f,'adunare.out');rewrite(f);
a:=a+b;
write(f,a);close(f);
{*}End.{*}