Cod sursa(job #380644)

Utilizator lionPopescu Andrei lion Data 7 ianuarie 2010 08:41:05
Problema A+B Scor 100
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.2 kb
program xyz; 
var b,c:longint;     
f:text; 
begin
assign (f,'adunare.in');reset(f); 
read(f,b); 
read(f,c); 
close(f); 
c:=c+b; 
assign(f,'adunare.out');rewrite(f); 
write(f,c); 
close (f);
end.