用VB语言设计程序,把一个正整数写成若干个素数相乘的形式.

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/05/12 13:50:56

Private Sub Command1_Click()
Dim I, J, X, Y, Z As Integer
Dim A(1 To 10000) As Integer
Dim Flag As Boolean
X = Int(InputBox("请输入一个正整数"))
Print X & "=";
Y = 1: Z = 1
For I = 2 To Sqr(X)
If X / I = Int(X / I) Then
A(Z) = I
Z = Z + 1
X = X / I
I = I - 1
End If
Next I
If Z = 1 Then
Print "不可分解"
Exit Sub
End If
If X 1 Then
A(Z) = X
Else
Z = Z - 1
End If
For I = 1 To Z
Print A(I);
If I < Z Then Print "*";
Next I
Print
End Sub
'定义的是整型变量,只要数据不是很巨大,一般没问题,如数据巨大,请楼主自己修正一下

用VB语言设计程序,把一个正整数写成若干个素数相乘的形式. 把36写成几个素数相乘的形式（） VB:输入一个正整数N,把它分解成质因子相乘的形式设计求出前100个正整数中的所有素数的一个算法,并用程序框图表示用C语言写"输入一个正整数m,判断它是否为素数"的程序. 用VB 能否判断一个11位数是否为素数,即用VB能否设计出程序证明费马对于素数的猜想是错误的,QUICKBASIC 用VB编写输入一个正整数N,把它分解成质因子相乘的形式.如输入36,输出36=1×2×2×3×3 从键盘输入若干个正整数,统计其平均值用while（1）的C语言程序用vb语言编写一个程序,将任意一个正整数N的立方分解为N个连续的奇数之和. 1:设计程序,输出所有小于等于n(n为一个大于2的正整数)的素数,要求:每行输出10个素数； C语言素数统计题目描述给定若干个正整数,请判断素数的个数；输入描述输入数据首先包含一个整数N（1 如何设计用vb语言编写一个程序,输入三个数,输出其中的最大数