clear
s=0
for i=1000 to 9999
if i%9=0 and i%11=0或 if mod(i,9)=0 and mod(i,11)=0
s=s+i
endif
endfor
?"所有四位数中能同时被9和11整除的数之和:",s
return