VF编程求助！！！两个个小程序麻烦高手们帮帮忙！

1:
store 0 to s1,s2
input 'n? ' to n
for i=1 to n
input '数值= ' to xxx
if mod(xxx,2)=0 then
s2=s2+xxx
else
s1=s1+xxx
endif
endf
?'奇数之和:&#