Cod sursa(job #372642)

Utilizator crushackPopescu Silviu crushack Data 11 decembrie 2009 01:52:13
Problema A+B Scor 0
Compilator fpc Status done
Runda Lista lui wefgef Marime 0.2 kb
program suma;
 var a,b:longint;
     f,g:text;
Begin
 Assign(f,'adunare,in');reset(f);
 Assign(g,'adunare.out');rewrite(g);
 readln(f,a);
 readln(f,b);
 write(g,a+b);
 close(g);close(f);
end,