[中学联盟]山东省胶南市大场镇中心中学初中信息技术 课件+练习（12份）

它的基本结构属于（ A ） A、顺序结构 B、选择结构 C、循环结构 D、树型结构 2、下列VB程序运行后，变量x的值为( A ). x=2 Print x+l Print x+2 A、2个 B、3个 C、5个 D、8个 3、下列VB程序运行后 a = 100  b = 20  a = a + b   b = a – b b的值为 (     ) A.100  B.120  C.20  D.80  二、编程练习： 1、输入一个三位整数，然后将它反向输出。 2、已知长方体的长、宽、高，编写一个程序，求长方形的全面积和体积。 3、编写一个程序，求平面中两点之间的距离。 $$ End Sub 运行时从键盘输入3和4，输入x的值是（ ） A）3 B）5 C）7 D）9 2. 假定有如下语句 Private Sub Form_Click() K = 2 If K >= 1 Then A = 3 If K >= 2 Then A = 2 If K >= 3 Then A = 1 Print A End Sub 运行时，输出的结果是（B） A）1 B）2 C）3 D）出错 3.走路可以减肥，平地甩手走20分钟内（含20分钟）消耗的能量为6卡每分钟，超过20分钟消耗的能量为7.9卡每分钟。走路的分钟数43分钟，输出共消耗的能量。（ ） Dim t,n as single t=val(inputbox(“请输入t的值”)) if t〈=20 then n=6*t else n=6*20+（t-20）*7.9 end if print “n=”;n A．258卡 B.339.7卡 C.439.7卡 D.301.7卡 $$ 运行结果： 1、 试在横线上填写合适的语句或表达式，使程序完成如下的功能：计算1+5+9+13+……+101的值。 Private Sub Command1_Click() Dim i As Integer For i= To step S= Next i Print “1+5+9+13+……+101=”;s End Sub 运行结果： 三、国际象棋的棋盘是正方形的，上面有8Х8共64个方格。相传是印度宰相达依尔发明的。国王罕舍要重奖他，说：“你想得到什么，我都可以给你。”宰相想了想，就说：“那就请你棋盘的第1格赐我1粒麦子，在第2格赐我2粒，在第3格赐我4粒，第4格赐我8粒，以后每格中的麦粒是前一格的2倍，这样放完64格，我就感恩不尽了。”国王听了，觉得宰相的要求并不高。说道：“好吧，你能如愿以偿的。”然而，国王却不知道这个数字有多么的巨大！ 试在横线上填写合适的语句或表达式，帮助国王计算一下，如果要放完64格棋盘，总共要多少粒麦子，看看国王能否满足宰相的要求。其中变量m记录各格所放的麦子数，变量s记录所放的麦子总数。 Private Sub Form_Click() m=1 s=1 For i= To m= s= Next i Print “一共要放” ; s ; “颗麦子” End Sub $$ 2、下面程序段显示（ ）个“*” For I=1 to 5 For j=2 to I Print “*” Next j Next i 3、有如下程序 For I =1 to 146 step 3 Print “a” Next I 程序运行后会打印（ ）个 a 4、判断下面程序运行的结果 Private sub command1_click() Counter=0 For i=1 to 4 For j=6 to 1 step -2 Counter=counter+1 Next j Next i Print counter End sub $$ 走进人工智能 学科网 软件和人工智能是我一生的挚爱，如果再开办一家公司的话，我希望从事人工智能领域的研究 。 ---比尔·盖茨 体验人工智能 打开桌面AI文件夹——双击打开我知你心图标，打开页面后选择简体中文版、性别、填写年龄。点击开始游戏。通过游戏体验人工智能。 游戏规则：想象一个对象，人工智能程序将通过询问简单的问题，猜出您想象的对象。 您所想象的对象必须为大多数人所熟悉，但是绝不能是特定的人物、地点或事件。 体验人工智能 学习 感知 逻辑判断 学科网 人工智