作业帮用VB编程实现下面的目的,输入一个正整数,然后计算该数的每一位非零数字相乘的积.
来源：学生作业帮 编辑：作业帮 分类：综合作业 时间：2024/05/09 10:45:37
用VB编程实现下面的目的,输入一个正整数,然后计算该数的每一位非零数字相乘的积.
如输入103601计算结果为1*3*6*1=18
如输入103601计算结果为1*3*6*1=18
用递归吧,省时省力,代码如下:
Option Explicit
Private Sub Command1_Click()
MsgBox cal(103601)
End Sub
Function cal(ByVal n As Long) As Long
Dim x As Integer
If n > 0 Then
x = n Mod 10
If x = 0 Then
x = 1
End If
cal = x * cal(n \ 10)
Else
cal = 1
End If
End Function
Option Explicit
Private Sub Command1_Click()
MsgBox cal(103601)
End Sub
Function cal(ByVal n As Long) As Long
Dim x As Integer
If n > 0 Then
x = n Mod 10
If x = 0 Then
x = 1
End If
cal = x * cal(n \ 10)
Else
cal = 1
End If
End Function
用VB编程实现下面的目的,输入一个正整数,然后计算该数的每一位非零数字相乘的积.
用C语言编程,输入一个正整数,计算并显示该数的各位数字之和.
用JAVA编程从键盘输入一个正整数,计算该数的各位数字之和并输出,例如输入数是5246
vf 编程求助啊要求用户输入一个正整数,然后计算从1到该数字之间有多少偶数、多少奇数、多少能被3整除的数,并分别显示出来
c语言编程输入一个正整数输出各位数字的反向排列 和输入一个大于等于一的正整数,判断该数是否为素数
C语言：输入一个正整数, 计算并显示出该数的各位数字之和.
VB编程：输入一个数,求它的自然数对,
用vb编程：输入三个数,求出最大的数
输入一个正整数,输出该数的各个数字之和.要求编写函数,计算整数的各个数字之和
.c语言编程：输入一个正整数,统计该数的各位数字中零的个数,并求各位数字中的最大者.
检查下我的程序输入一个正整数,计算该数各位数字的和,并输出倒序数
c++编程 输入一个四位正整数,然后分别显示其千位数、百位数、十位数和个位数及其他每位数字对应的ASCII码