VB 十位数为2的7的所有三位数倍数

问题描述:

VB 十位数为2的7的所有三位数倍数
2.编写程序,找出7的倍数中十位数为2的所有3位数.
【提示】用任意一种循环语句来完成,在循环体内使用选择结构来判断条件.

for i=100 to 999
if i/7=int(i/7) and int((i-int(i/100)*100)/10)=2 then print i,
next i