作业帮 > 数学 > 作业

VB语言:找出所有三位数,满足其个位,十位,百位三个数字之和为10

来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/08/25 15:23:42
VB语言:找出所有三位数,满足其个位,十位,百位三个数字之和为10
private sub form_load()
dim i,a,b,c as integer
for i=100 to 999
a=i\100
b=(i-a*100)\10
c=i-a*100-b*10
if a+b+c=10 then print i,
next
end su