问题标题：
vb程序个位数为6,能被3整除,且十位数是偶数的三位数共有多少个要数字显示出来的我建了一个COMMAND键,就点一下就出来的那种
问题描述：
vb程序个位数为6,能被3整除,且十位数是偶数的三位数共有多少个要数字显示出来的
我建了一个COMMAND键,就点一下就出来的那种
曹莉华回答：
PrivateSubCommand1_Click()
DimiAsInteger,nAsInteger
n=0
Fori=106To999Step20
IfiMod3=0Then
n=n+1
EndIf
Nexti
Printn
EndSub
说明一下,这个算法其实有点取巧,没有很复杂的用多重判断,然后把数字拆分.
n是用来计数的,就是个数,每次有一个三位数符合,就加1,i是用来执行循环的,最巧妙的地方在i=106to999step20106是最小的符合个位数是6,十位数是偶数的数,然后每循环一次,就加20,加20就保证了每次都是十位数为偶数,而且个位数是6,保持不变.
点击显示
数学推荐
热门数学推荐