VB中从键盘输入一个正整数，判断其是否是素数。 Private Sub Command1_Click()Dim a As Integera=Val(InputBox(\"请输入一个非1非2的正整数：\"))n=0For i=2 To Sqr(a)n=a Mod i If n=0 Then MsgBox a&\"不是素数\"Exit For '。
从键盘输入一个整数，判断该数是否是一个质数的C程序怎么写 #includeincludevoidmain(){intnumber，n=0；变量2113number保存输入的数；变量n保存该数5261的位数；printf(\"请输入一个整数\\n\")；scanf(\"%d\"，&number)；读取用户输4102入的数，保存到变量number中printf(\"逆向1653输出后结果：\")；while(number){number不为0时始终循环printf(\"%d\"，number%10)；每次循环输出最后一个数位number=number/10；number除10取整(相当于截掉最后一个数位)n+；位数+1}printf(\"\\n该数是%d位数\\n\"，n)；输出变量n的值也就是该数的位数getch()；这一句没用，只是让控制台窗口不关闭}请参考
VB中从键盘输入一个正整数，判断其是否是素数。 Private Sub Command1_Click()Dim a As Integera=Val(InputBox(\"请输入一知个非道1非2的正整数：\"))n=0For i=2 To Sqr(a)n=a Mod iIf n=0 ThenMsgBox a&\"不是素内数Exit For ' exit for拿到容if里面End IfNext iIf i>；Sqr(a)Then MsgBox a&\"是素数End Sub
