> 其他 >
编写程序,求在四位数的奇数中,所有各位数字之和是25的倍数的数的和?请大家帮个忙了.
人气:357 ℃ 时间:2020-04-25 07:55:50
解答
我用VB写了:For i = 1001 To 9999 Step 2temp1 = i Mod 10n1 = Int(i / 10)temp2 = n1 Mod 10n2 = Int(i / 100)temp3 = n2 Mod 10temp4 = Int(i / 1000)If ((temp1 + temp2 + temp3 + temp4) = 25) ThenSum = Sum +...
推荐
猜你喜欢
© 2026 79432.Com All Rights Reserved.
电脑版|手机版