VB qing gao shou
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/09 06:31:28
VB qing gao shou
'以下程序用于判断一个正整数(≥3)是否为素数.
'
Private Sub Form_Click()
n = InputBox("请输入一个正整数(≥3)")
k = Int(Sqr(n))
i = 2
swit = 0
'
】
End If
Loop
If swit = 0 Then
Print n; "是一个素数"
Else
Print n; "不是素数"
End If
End Sub
'以下程序用于判断一个正整数(≥3)是否为素数.
'
Private Sub Form_Click()
n = InputBox("请输入一个正整数(≥3)")
k = Int(Sqr(n))
i = 2
swit = 0
'
】
End If
Loop
If swit = 0 Then
Print n; "是一个素数"
Else
Print n; "不是素数"
End If
End Sub
'以下程序用于判断一个正整数(≥3)是否为素数.
'Private Sub Form_Click()
n = InputBox("请输入一个正整数(≥3)")
k = Int(Sqr(n))
i = 2
swit = 0
'
【i=i+1】
End If
Loop
If swit = 0 Then
Print n; "是一个素数"
Else
Print n; "不是素数"
End If
End Su
'Private Sub Form_Click()
n = InputBox("请输入一个正整数(≥3)")
k = Int(Sqr(n))
i = 2
swit = 0
'
【i=i+1】
End If
Loop
If swit = 0 Then
Print n; "是一个素数"
Else
Print n; "不是素数"
End If
End Su
VB qing gao shou
qing jiao gao shou!
zai ci qing wen ? gao shou qing
#@@@@#gao shou?
硬盘问题!gao shou lai!
dian nao gao shou jin
gao shou men求详解
dian nao gao shou jin a
gao qing读拼音写汉字
qing wen ru he rang da tui shou xia lai?
about computer writing...dian nao gao shou jin
shou xue与shuo da wu peng和qing fu,看拼音,写词语