Cod sursa(job #29353)

Utilizator v@syv@sy vasy v@sy Data 9 martie 2007 09:22:17
Problema A+B Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.2 kb
Raporteaza aceasta sursa 
var a,b,s:integer;
     f,g:text;
 begin
 assign(f,'date.in');
 assign(g,'date.out');
 reset(f);
 rewrite(g);
 readln(f,a);
 readln(f,b);
 s:=a+b;
 write(g,s);
 close(f);
 close(g);
 end.