广西2019-2020学年普通高中下学期信息技术学业水平模拟...

x=9

Print "x="; x+1

x=y

y=x

If a>=0 Then       

b=a+2       

Else        

b=a-2       

End If

For n = 1 To 4

  s = n * n

Print s;

Next n

For n = 1 To 4

 s = n * n

Print s;

Next n

操作步骤：

A.选中正文，将文档分为两栏

B.选中正文，将文档分为两页

C.选中正文，设置段落左缩进2字符

D.选中正文，设置段落首行缩进2字符

E.选中正文，设置字体为隶书、字号为五号

F.选中正文，设置字体为宋体、字号为五号

正确的操作步骤是(只填字母序号)： ；；。

操作步骤：

A. 在“保存图片”对话框中，选定保存位置为“图片”文件夹

B. 在"保存Web页”对话框中，选定保存位置为“图片”文件夹

C. 在文件名组合框中，输入文件名“对话大会”，单击“保存”按钮

D. 在网页图片上单击鼠标右键，在弹出的快捷菜单中选择“目标另存为”命令

E. 在网页图片上单击鼠标右键，在弹出的快捷菜单中选择“图片另存为”命令

正确的操作步骤是(只填字母序号)：；；。

任务：将“我的团课”文件夹中的“团歌.mp3”、“团课.ppt”、“团课视频.rar” 三个文件复制到D盘“团队活动”文件夹中。

操作步骤：

算法描述如图所示，请将程序补充完整。

Private Sub Form_Click()

Dim n As Integer, i As Integer

Dim x As Integer       ‘判断是否为季生素数的变量

 = Val(InputBox("输入自然数 n"))

x=1

If n<=1 Then x = 0

End If

For i = 2 To Sqr(n+2)

  If n Mod i = 0 OrThen

    x = 0

  End If

  Next i

  If x=1 Then

    Print n,n+2 ;"是孪生素数”

  Else

    Print ;"不是孪生素数”

  End If

End Sub