求100以内的素数,素数是指一个数x除了1和它本身,不能被其他任何整数整除.要求每行输出10个素数.
题目
求100以内的素数,素数是指一个数x除了1和它本身,不能被其他任何整数整除.要求每行输出10个素数.
条件是用VB ,求这个程序的代码.
答案
Private Sub Command1_Click()Dim i,j As Longfor i=1 to 100If prime(i) Then Print i;j=j+1if j mod 10=0 then printend ifnextEnd SubPrivate Function prime(ByVal n As Long) As Boolean '返回值=True是素数,Fa...
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点
- 句子改成被动语态 what do you often eat for breahtost
- 英语翻译
- 要一段100字左右的人物心理描写(在线等!)
- 急!论语中的名言名句的解释,尽量详细
- 在三棱锥P-ABC中,已知底面ABC是以C为直角三角形,PC垂直ABC,AC=18,PC=6,BC=9,G是三角形PAB的重心,M是棱AC的中点,求直线CG与直线BM所成角的大小.
- 小强的体重比小华重1/12,小华的体重比小强轻( )
- 在负功的方向没有位移怎么会是功 功的意思不是在力的方向上发生位移?
- We all know that the old should be spoken to ( )
- What do you want to ______ like?
- Mr Hand has much experience dealing with teenagers.He always has good solution____their problems.