首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command l Click() Dim i As Integer,j As Integer n=InputBox(“输入一个大于1的正整数”) For i=2 To n Forj=2 To Sqr(i) Ifi
编写如下程序: Private Sub Command l Click() Dim i As Integer,j As Integer n=InputBox(“输入一个大于1的正整数”) For i=2 To n Forj=2 To Sqr(i) Ifi
admin
2020-04-18
35
问题
编写如下程序:
Private Sub Command l Click()
Dim i As Integer,j As Integer
n=InputBox(“输入一个大于1的正整数”)
For i=2 To n
Forj=2 To Sqr(i)
Ifi Modj=0 Then Exit For
Nextj
ifj>Sqr(i)Then Print i
Next i
End Sub
该程序的功能是
选项
A、判断n是否为素数
B、输出n以内所有的奇数
C、输出n以内所有的偶数
D、输出n以内所有的素数
答案
D
解析
本题中的外循环是从2循环到n,然后进入内循环,在内循环中依次判断i能否被j整除,若能整除则退出内循环;内循环结束后进行判断,如果是中途退出内循环的则必然不满足j>Sqr(i).不会输出i的值;只有i不能被任何一个j整除的情况下才会输出i的值,即判断i是不是素数,只有素数才输出。
转载请注明原文地址:https://kaotiyun.com/show/biTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommandl_Click()a$=InputBox(”请输入一个二进制数”):n=Len(a$)Fori=1Ton
设有如下程序:PrivateSubForm_Click()Dam=InputBox(”请输入一个实数”):P=InStr(num,".")Ifp>0ThenPrintMid(num,P+1
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程:PrivateSubCornmandl_Click()c=1234c1=Trim(Str(c))Fori=1To
编写如下程序:PrivateSubCommand1_Click()DimxAsInteger,YAsIntegerx=10:y=20Callfunl(x,y)Printx;YEndSubPr
编写如下程序:PrivateSubCommandl_Click()DimxAsInteger,yAsIntegerx=InputBox(”输入第一个数”):y=InputBox(”输入第二个数”)
在窗体上画一个名称为Commandl的命令按钮,并编写如下程序:FunctionFun(x)y=0Ifx
窗体上有一个名称为CDl的通用对话框,一个名称为Commandl的命令按钮,相应的事件过程如下:PrivateSubCommand1_Click()CD1.Filter=”AllFilel*.*|TextFile|*.tx
设窗体上有一个通用对话框控件CD1,希望在执行下面程序时.打开如图所示的它件对话框PrivateSubCommando_Click()CD1.DialogTitle=”打开文件”CD1.InitDit="C:\”CD1.Filt
设a=2,b=3,c=4,d=5,下列表达式的值是a>bAndc
随机试题
汽车上的辅助电器有哪些?
利用________,可以在最短的时间内创建出较为理想的幻灯片,大大节省时间和精力。
血管紧张素Ⅱ的生理作用不包括
周K线中用的最高价是一周内的最高价。( )
上市公司非公开发行股票,对控股股东实际控制人及其控制的企业认购的股份限制转让的期限是()。
下列各项中,通常应确认收入的有()。
有一条公路长900米,在公路的一侧从头到尾每隔10米栽一根电线杆,可栽多少根电线杆( )。
“八议”中有“议宾”一项,“宾”指()。
怎样认识和理解社会主义公有制与市场经济的兼容性?
下列选项中,不属于显示器主要技术指标的是()。
最新回复
(
0
)