分析是不是素数

原创 2012年03月26日 19:36:20

Private Sub Command1_Click()

Dim M As Integer

Dim N As Integer

Dim flag As Boolean

M=Int(Val(Text1.Text))

N=M-1

flog=False   '为true时,表示M可以被比他小的整数整除'

While N>=2

If M Mod N=0 Then

Flag=True

End If

N=N-1

Wend

If flag =True Then

Print   "你是不是素数"

Else Print   "你是素数"

End If

End Sub

     这节课求的是:请你输入一个正整数,我来帮你分析他是不是素数。在前几节课的基础上,这节课设计起来就不是那么难了,而且也有一点理解实验步骤的原因了。但是还是有好多不懂,不过再问了学长、学姐后就清楚了。他们都很尽职,给我讲解的很详细,在听了他们的讲解后一切问题都会幡然醒悟。不过让我自己设计VB程序依然是个严重的问题,这对我来说应该是一个巨大的挑战!不过,我会坚持下去的。

欧拉函数 最大素因数 素数判断 素数表

1. 求欧拉函数(小于n的数中与n互质的数的数目) 2. 求最大素因数 3. 打素数表 4. 判断一个数是否是素数 5. 在一些题目中,需要先提前暴力出最大值,否则会超时。...
  • cFarmerReally
  • cFarmerReally
  • 2016年08月04日 22:10
  • 2163

C/C++ 输入一个数 判断是否是素数

判断一个数是否是素数的小程序, 顺便试验了一下, cin.fail(), cin.clear(), cin.sync()这三个函数...
  • w442863748
  • w442863748
  • 2015年12月31日 11:30
  • 698

C语言之函数调用09—判断一个数是否为素数

//函数调用 /* ========================================================== 题目:判断一个数是否为素数。如3是素数,4不是素数。 ...
  • LZX19901012
  • LZX19901012
  • 2015年07月22日 02:05
  • 2008

for循环,判断一个数是否是素数。

作为好久没血C语言的我,今天确实要花很多功夫来补习以前的功课。今天学习了for循环,有的时候遇到题目还是想不到思路,这道素数题写法有很多,我选取了一种我自己能容易理解的一种。若大家有其他思路,请留言。...
  • xngjing
  • xngjing
  • 2017年07月13日 00:13
  • 401

JavaScript判断输入的数是不是素数

素数测试 function sushu(n){ //if (n==1||n==3) {alert(n+"you are wrong!")} if(n==0||n==1){ ...
  • huochequan888
  • huochequan888
  • 2016年12月17日 22:52
  • 497

利用标志flag,设计一个函数,检测一个数是否为质数(素数)

#include #include //设计一个函数,检测一个数是否为质数(素数) //只能被1和自身整除的数才是质数 int zhishu(int data) { if(data...
  • u012110719
  • u012110719
  • 2015年03月27日 17:52
  • 1275

Java判断一个数是不是素数

[java] view plaincopy import java.util.Scanner;      //质数又称素数,是指在一个大于1的自然数中,除了1和此整数...
  • sdujava2011
  • sdujava2011
  • 2014年09月17日 23:06
  • 2714

猫扑素数

猫扑素数2017 年 4 月美团 Android 面试题:求猫扑素数 形如以 2 开头, 之后跟任意多个 3 的十进制整数如果是个素数, 则它是猫扑素数。 如 2、 23、 233、2333...
  • u010976213
  • u010976213
  • 2017年05月16日 11:10
  • 1217

判断一个数是否为回文素数

/* * Copyright (c) 2012, 烟台大学计算机学院 * All rights reserved. * 作 者:刘明亮...
  • lml58586
  • lml58586
  • 2012年11月19日 16:17
  • 983

EXCEL自定义函数求1000以内的质数

EXCEL自定义函数求1000以内的质数 自定义函数 =ZS(ROW(A1)) 下拉   自定义函数代码 Function ZS(s%) Dim f As Boolean, arr(), a%, i%...
  • gufengaoyue
  • gufengaoyue
  • 2013年11月15日 16:37
  • 882
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:分析是不是素数
举报原因:
原因补充:

(最多只允许输入30个字)