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

wangaobai 1年前 已收到1个回答 举报

朵拉12ba 花朵

共回答了23个问题采纳率:95.7% 举报

private sub form_load()
dim i,a,b,c as integer
for i=100 to 999
a=i100
b=(i-a*100)10
c=i-a*100-b*10
if a+b+c=10 then print i,
next
end su

1年前

6
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 16 q. 0.031 s. - webmaster@yulucn.com