现在给出你一些数,要求你写出一个程序,输出这些整数相邻最近的素数,并输出其相距长度.
来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/11/11 08:02:38
现在给出你一些数,要求你写出一个程序,输出这些整数相邻最近的素数,并输出其相距长度.
Dim tom As Boolean = True
Dim xx, ii, i, xxx, iii As Integer
If TextBox1.Text = "" Then
TextBox1.Text = 3
End If
Do Until tom = False
ii = ii + 1
xx = Val(TextBox1.Text) + ii
For i = 2 To xx - 1
If xx Mod i = 0 Then Exit For
Next
If i = xx Then Exit Do
Loop
Do Until tom = False
iii = iii + 1
xxx = Val(TextBox1.Text) - iii
For i = 2 To xx - 1
If xxx Mod i = 0 Then Exit For
Next
If i = xxx Then Exit Do
Loop
If iii > ii Then
TextBox2.Text = xx & "----两数相差" & ii
ElseIf iii < ii Then
TextBox2.Text = xxx & "----两数相差" & iii
Else
TextBox2.Text = xx & "----两数相差" & ii
End If
Dim xx, ii, i, xxx, iii As Integer
If TextBox1.Text = "" Then
TextBox1.Text = 3
End If
Do Until tom = False
ii = ii + 1
xx = Val(TextBox1.Text) + ii
For i = 2 To xx - 1
If xx Mod i = 0 Then Exit For
Next
If i = xx Then Exit Do
Loop
Do Until tom = False
iii = iii + 1
xxx = Val(TextBox1.Text) - iii
For i = 2 To xx - 1
If xxx Mod i = 0 Then Exit For
Next
If i = xxx Then Exit Do
Loop
If iii > ii Then
TextBox2.Text = xx & "----两数相差" & ii
ElseIf iii < ii Then
TextBox2.Text = xxx & "----两数相差" & iii
Else
TextBox2.Text = xx & "----两数相差" & ii
End If
c语言现在给出你一些数,要求你写出一个程序,输出这些整数相邻最近的素数,并输出其相距长度.
编写一个程序输入一个3位正整数要求反向输出对应的整数如输入123则输出321.编写程序并给出相应的流程图.
设计一个程序,要求输入三个整数,能求出其中最大的数并输出
给出下列程序:输入数——*(-3)——*5——输出数,根据这个程序,请你输入一个你最喜欢的数,并写出输
给出一个整数n,让你判断n是否是素数,如果n是素数,则输出 yes 否则输出 no 用pascal语言做题
设计一个程序,求出200~1000之间的所有素数,要求每行输出5个素数.判断一个整数是否为素数用一个函数来实
设计一程序,求出5到100之间的所有素数,要求每行输出五个素数.判断一个整数是否是为素数用一个函数来实
编写程序完成判断一个整数是否是素数的功能.写一个判素数的函数prime要求在主函数输入一个整数,输出是否
设计一个程序,要求输入三个整数,能求出其中最大的数并输出.程序中必须用函数求出两个数中的大数.
C语言,写一个判断是否是素数的函数,在主函数输入一个整数,程序输出该数是否为素数的信息.
编写程序,求[m,n]区间内的素数的个数,并输出这些素数.m,n由键盘输入.
输入10个数,找出其中最大的数并输出,设计一个算法,画出程序框图,并写出程序.