问题 多项选择题

在考生文件夹下有一个工程文件sjt4. vbp,相应的窗体文件为sjt4. fm,在窗体上有一个文本框和一个命令按钮。程序运行后,单击命令按钮,即可计算出1~1000范围内能被7整除或被5整除的整数的个数,并显示在文本框中。在窗体的代码窗口中,已给出了部分程序,其中计算能被7整除或能被5整除的整数的个数的操作在通用过程Fun中实现,请编写该过程的代码。
要求:请勿改动程序中的任何内容,只在Function Fun()和End Function之间填入你编写的若干语句。最后将修改后的文件按原文件名存盘。

答案

参考答案:[解题思路] 本题要求的是A000以内能被E或G整除的数的个数。在Visual Basic中,使用Mod运算符来判断一个数是否可以被另一个数整除,如果计算结果为0,则表示可以整除,否则不能整除。
[操作步骤]
步骤A:打开本题工程文件。
步骤B:分析并编写程序代码。
参考答案:
Function Fun()
Dim s As Integer, i As Integer
For i = A To A000
If i Mod E = 0 Or i Mod G = 0 Then
s=s+A
End If
Next i
Fun=s
End Function
步骤C:调试并运行程序,关闭程序后按题目要求存盘。

单项选择题 A3/A4型题
阅读理解

At first sight, you would think the collection of hundreds of colored shards(碎片)could be a work of abstract art. But the objects are the contents of the stomach of a sea turtle that lost its battle with plastic pollution.

Environmentalists examined the stomach of the turtle found off the coast of Argentina. What they found is the symptom of the increasing threat to sea turtles from a human addiction to plastic.

Sea turtles often mistake plastic items for jellyfish or other food. Ingesting(摄取)ocean pollution can cause a digestive blockage and internal cuts. The result can be dangerous, followed by death.

Humans produce 260 million tons of plastic a year. When those products are pulled into the sea’s currents, the plastics are just broken into smaller pieces which are consumed by marine life at the bottom of the food chain. An examination of a green turtle found off Florida discovered that, over the course of a month, the animal’s faeces(粪便)had contained 74 foreign objects, including “four types of balloons, different types of hard plastic, a piece of carpet--like material and two 2--4 mm tar balls.”

“The oceans have become a giant refuse bin for all manner of plastics. All sea turtle species may be seriously harmed, “according to the biologists Colette Wabnitz, from the University of British Columbia. ”The symptom of this growing crisis can be seen inside and on sea turtles as well as their oceanic and terrestrial habitats. It is urgently necessary to directly confront the source of plastic pollution, redesign packaging and rethink the very idea of ‘throwaway culture’.”

Almost all marine species, from plankton to whales, have ingested plastic. But, even in small quantities, plastic can kill sea turtles, the biologists said.

Fifty out of 92 turtles found dead, stranded on the shorelines of Rio Grande do Sul state in Brazil, had ingested a “considerable amount of man-made debris”.

小题1:What’s tile passage mainly about?

A.How to prevent the sea turtle from plastic.

B.Why plastic is dangerous to the sea turtle.

C.Protecting the sea turtle from being polluted.

D.Sea turtles suffering from plastic pollution.小题2:The author mentions the “throwaway culture” probably in a(n) _________ tone.

A.praising

B.positive

C.ironic

D.comedic小题3:The underlined word in the last paragraph probably means _________.

A.a kind of food

B.a kind of fish

C.pieces of cloth

D.pieces of rubbish小题4:The paragraph following the last one will probably talk about ________.

A.the way the biologists examined the sea turtle

B.some tips on how to make sea turtles avoid plastic

C.how to prevent plastic pollution

D.the reason why we should protect the sea turtle