clear
s1=0
s2=0
for i=1 to 100
if i%2=0
s1=s1+i^3
else
s2=s2+i^2
endif
endfor
"1-100以内的奇数平方和:",s2
"1-100以内的偶数立方和:",s1