请问怎么用VB编写程序,用递归过程判断一个数是否是素数啊?(调用函数过程)一定要是递归过程

就是不知道怎么用递归过程判断素数啊?郁闷。。。。。。
求助高手!!

Private Sub Command1_Click()
Dim T As Long, TT As Long, TTT As Long, S As String

S = InputBox("请输入要判断的素数", "")
T = Val(S)
TT = 2
TTT = Int(Sqr(T))
If PSS(T, TT, TTT) Then
MsgBox "输入的数 " & CStr(T) & " 是素数", , ""
Else
MsgBox "输入的数 " & CStr(T) & " 不是素数", , ""
End If
End Sub

Private Function PSS(ByRef A As Long, ByRef B As Long, ByRef C As Long) As Boolean
If B <= C Then
If A Mod B = 0 Then
PSS = False
Else
PSS = PSS(A, B + 1, C)
End If
Else
PSS = True
End If
End Function
温馨提示:内容为网友见解,仅供参考
无其他回答

VB中判断闰年和判断水仙花数的程序是什么?
1.程序分析:判断素数的方法:用一个数分别去除2到sqrt(这个数),如果能被整除,则表明此数不是素数,反之是素数。【程序3】题目:打印出所有的"水仙花数",所谓"水仙花数"是指一个三位数,其各位数字立方和等于该数本身。例如:153是一个"水仙花数",因为153=1的三次方+5的三次方+3的三次方。

编写一个C语言程序判断一个数是否是素数
1、首先打开编辑器软件,在里面新的C语言文件里引入头文件并输入主函数,在主函数中输入代码:2、然后写入判断素数的逻辑,这里先引入一个scanf函数,接受用户输入的数值存入变量,对接收的变量判断其是否为素数,判断的依据是如果能被2到n-1中的某个数整除就是素数,否则就不是。最后把判断的结果打印...

编写一个程序,求一个数的所有因子
import java.util.List;public class StackOfIntegers { \/\/存放分解的素数 List<Integer> list = new ArrayList<Integer>();\/\/主方法,求分解素数 public void getSub(int sum){ \/\/获取中间数的后一个数,保证中间数可以在下面的for中被循环 int middle = getMiddleAfter(sum);\/\/2是最小的素...

VB 问题。输入一个大于6的偶数(可拆分为两素数之和),怎样在窗体上输出这...
Private Sub Command1_Click()Dim Oushu As Long, I As Long Cf:Oushu = InputBox("请输入一个大于6的偶数")If Oushu <= 6 Or Oushu Mod 2 <> 0 Then MsgBox "要输入大于6的偶数!"GoTo Cf End If For I = 2 To Oushu \/ 2 If Ss(I) And Ss(Oushu - I) Then Print Oushu; ...

用C++编写一个判断素数合数的程序,要求输入素数时显示出“此数是素 ...
include<iostream.h> bool prime(int n)\/\/判断是否为素数 { int i;bool flag=true;for(i=2;i<=n\/2;i++)if(n%i==0)flag=false;if(flag==true||n==2)return 1;\/\/是的话返回 true return 0;\/\/否则 flase } int fun(int n)\/\/将合数分解,这里用了函数的递归调用 { int i;if(...

python判断质数
python判断质数用函数写1、下面是一个Python程序,可以实现函数Prme(n),接收正整数n作为参数,判断该正整数是否为素数。在这个程序中,我们定义了函数Prme(n),接收一个正整数n作为参数。2、打开pycharm,点击file,点击new,新建一个空白的pyrthon文件:这里开始编写判断素数的代码,判断素数的上限最准确...

VB.NET程序设计实用教程目录
4.5 任务4-4:求函数s(x,n)过程嵌套 4.6 任务4-5:Hanoi(汉诺塔)问题——递归过程 第5章 程序调试和异常处理 5.1 程序的调试 5.1.1 VBNET的3种工作模式 5.1.2 使用调试工具调试程序 5.1.3 常用的调试窗口 5.2 任务5-1:具有非结构化异常处理的简单计算器——非结构化异常处理 ...

4、设计一个函数,当给定一个整数后,能得到该数的补码(应考虑该整数是正...
1. 编写一个函数,判断一个数是不是素数。在主函数中输入一个整数,输出是否是素数的信息。实验步骤与要求:(1) 编写一个函数prime(n),返回给定整数n是否为素数。(2) 编写一个主函数,输入一个整数,调用(1)中的函数,判断此整数是否为素数,并输出结果。(3) 对于属于多函数程序,可以采用每个函数分别进行编辑、...

求一个c++小程序源代码,要求200行以上,给100分,能用再加100
三队赛手的名单。 0Q>Yoa 11 1.程序分析:判断素数的方法:用一个数分别去除2到sqrt(这个数),如果能被整除, *7-uQKp 则表明此数不是素数,反之是素数。 p&ZD1qa 2.程序源代码: a<vCAFQ main() =&}dP%3LC) { ZYL]|\/"J9 char i,j,k;\/*i是a的对手...

编写程序求:给出一个整数n,一个数组{a1,a2,...,an},将n表示成数组中若...
递归就可以解决,给你写个递归式吧;调用方法如下int a[6]={1,8,4,3,5,2};int chose[6]={-1,-1,-1,-1,-1,-1};decompose( a,5,0,10,chose,0);void print( int *chose , int n ){ for( int i = 0 ; i < n ; ++i ) printf("%d\\t",chose[i]); printf("\\n");}\/\/参数...

相似回答