求出满足以下条件的三位数:它除以11所得的商等于它各位数字之和用for或do或do-while循环

hawkzcy 1年前 已收到3个回答 举报
赞

slkdafjlkasjdfkl 幼苗

共回答了17个问题采纳率：76.5% 举报

核心的代码：
for i = 100 to 999
if i = (Int (Mid (i,1,1)) + Int (Mid (i,2,1)) + Int (Mid (i,3,1)))*11 then
echo i
end if
next

1年前

7

阿屁哦 种子

共回答了23个问题采纳率：82.6% 举报

do until i > 999
if i = (Int (Mid (i,1,1)) + Int (Mid (i,2,1)) + Int (Mid (i,3,1)))*11 then
print i
end if
loop

1年前

1

zlseewg 幼苗

共回答了16个问题采纳率：81.3% 举报

楼上不对，i可能是1、2位数，也没自加。
while i > 99 and i
if i = (Int (Mid (i,1,1)) + Int (Mid (i,2,1)) + Int (Mid (i,3,1)))*11 then
>>i
end if
i ++
wend

1年前

0
可能相似的问题

你能帮帮他们吗

精彩回答

Copyright © 2024 YULUCN.COM - 雨露学习互助 - 18 q. 2.450 s. - webmaster@yulucn.com