clear
set talk off
n=0
for i=10 to 100
if i%7=0 or i%9=0
n=n+1
endif
endfor
"10~100内能被7或9中的一个整除的整数的个数是",n
set talk on
return