编写程序,求在四位数的奇数中,所有各位数字之和是25的倍数的数的和?请大家帮个忙了.
来源:学生作业帮 编辑:搜搜考试网作业帮 分类:综合作业 时间:2024/07/31 05:01:47
编写程序,求在四位数的奇数中,所有各位数字之和是25的倍数的数的和?请大家帮个忙了.
![编写程序,求在四位数的奇数中,所有各位数字之和是25的倍数的数的和?请大家帮个忙了.](/uploads/image/z/270443-11-3.jpg?t=%E7%BC%96%E5%86%99%E7%A8%8B%E5%BA%8F%2C%E6%B1%82%E5%9C%A8%E5%9B%9B%E4%BD%8D%E6%95%B0%E7%9A%84%E5%A5%87%E6%95%B0%E4%B8%AD%2C%E6%89%80%E6%9C%89%E5%90%84%E4%BD%8D%E6%95%B0%E5%AD%97%E4%B9%8B%E5%92%8C%E6%98%AF25%E7%9A%84%E5%80%8D%E6%95%B0%E7%9A%84%E6%95%B0%E7%9A%84%E5%92%8C%3F%E8%AF%B7%E5%A4%A7%E5%AE%B6%E5%B8%AE%E4%B8%AA%E5%BF%99%E4%BA%86.)
我用VB写了:
For i = 1001 To 9999 Step 2
temp1 = i Mod 10
n1 = Int(i / 10)
temp2 = n1 Mod 10
n2 = Int(i / 100)
temp3 = n2 Mod 10
temp4 = Int(i / 1000)
If ((temp1 + temp2 + temp3 + temp4) = 25) Then
Sum = Sum + i
End If
Next i
Print Sum
有问题的话,可以用HI给我留言!
For i = 1001 To 9999 Step 2
temp1 = i Mod 10
n1 = Int(i / 10)
temp2 = n1 Mod 10
n2 = Int(i / 100)
temp3 = n2 Mod 10
temp4 = Int(i / 1000)
If ((temp1 + temp2 + temp3 + temp4) = 25) Then
Sum = Sum + i
End If
Next i
Print Sum
有问题的话,可以用HI给我留言!
编写程序,求在四位数的奇数中,所有各位数字之和是25的倍数的数的和?请大家帮个忙了.
编写程序,求在四位数的奇数中,所有各位数字之和是25倍数的数的和.
编写程序,求在四位数的奇数中,所有各位数字之和是25的倍数的数的和.我的错在哪里,看下面
求在四位数的奇数中,所有各位数字之和是25的倍数的数的和
用c语言这题该怎么写 求在四位数的奇数中,所有各位数字之和是25的倍数的数的和
求在四位数的偶数中 所有各位数字之和是6的倍数的数的和
用C语言编写求四位数的奇数中,所有各位数字之积(且不为0)是60的倍数的数的和
编程求在四位数的偶数中,所有各位数字之和是30的倍数的数之和
用VB编写程序,求三位数的奇数中,所有各位数字之和是12的倍数的数的个数?
求四位数的偶数中,所有各位数字之和是15的倍数的数的和.
求四位数的偶数中,所有各位数字之和是十五的倍数的数的和
求四位数的偶数中,所有个位数字之和是24的倍数的数的个数