高职招考计算机类程序设计数组知识
《高职招考计算机类程序设计数组知识》由会员分享,可在线阅读,更多相关《高职招考计算机类程序设计数组知识(13页珍藏版)》请在装配图网上搜索。
福建省高职招考信息技术类计算机程序语言设计基础 1 数组训练 1 DIM A 3 3 FOR I 1 TO 3 FOR J 1 TO 3 A I J inputbox 请输入一个整数 NEXT J NEXT I FOR I 1 TO 2 FOR J I 1 TO 3 TEMP A J I A J I A I J A I J TEMP NEXT J NEXT I PRINT FOR I 1 TO 3 FOR J 1 TO 3 PRINT A I J NEXT J PRINT NEXT I 程序运行后 分别输入 1 6 4 8 2 5 9 3 7 则程序 的运行结果为 2 DIM a 10 10 k 1 for i 1 to 10 for j 1 to i a I J k k k 1 print a I j if k 10 then END next j print next i 福建省高职招考信息技术类计算机程序语言设计基础 2 end 以上程序运行后 a 3 3 的值是 3 下列程序的运行结果为 Dim A 5 5 As Integer I As Integer J As Integer For I 1 TO 3 For J 1 To 3 A I J I 1 3 J Print A I J Next J Print Next I End 4 在窗体上画一个名称为 Commandl 的命令按钮 然后编写如 下程序 Private Sub Commandl Click Dim i As Integer j As Integer Dim a 10 10 As Integer For i 1 To 3 For j i To 3 a i j i 1 3 j Print a i j Next j Print Next i End Sub 程序运行后 单击命令按钮 窗体上显示的是 5 在窗体上画一个命令按钮 名称为 Command1 然后编写如 下代码 Option Base 0 Private Sub Command1 Click Dim A 4 As Integer B 4 As Integer For k 0 To 2 A k 1 InputBox 请输入一个整数 B 3 k A k 1 Next k 福建省高职招考信息技术类计算机程序语言设计基础 3 Print B k End Sub 程序运行后 单击命令按钮 在输入对话框中分别输入 2 4 6 输入结果为 6 有如下程序 dim A 5 FOR K 1 TO 5 A K 2 K Next k FOR K 2 TO 4 A K A K 1 A K 1 Next k print A 2 A 4 则程序输出结果是 下列程序运行后输出的结果是 FOR I 1 to 10 A I I 10 I NEXT I PRINT A 6 A 5 8 在窗体上添加一命令按钮 其名为 Command1 然后编写如下 事件代码 Private Sub Command1 Click Dim a 5 As Integer b 5 As Integer n 3 For I 1 to 5 a i I b i 2 a i i Next I Print a n b n End Sub 程序运行的结果为 9 Option base 1 Private Sub Command1 Click Dim a 3 3 For i 1 to 3 福建省高职招考信息技术类计算机程序语言设计基础 4 For j 1 to 3 a i j i j i Next j Next i Sum 0 For i 1 to 3 Sum Sum a i 4 i Next i Print Sum End Sub 运行后单击按钮 输出结果是 10 有如下程序 private sub form click dim a 3 3 for j 1 to 3 for k 1 to 3 if j k then a k j 1 elseif j0 Then sum sum arr i Next i Print sum End Sub 上面程序运行后 单击 Command1 命令按钮 输出结果是 17 private sub form click dim a 3 3 for i 1 to 3 for j 1 to 3 t t 1 a i j t next j next i 福建省高职招考信息技术类计算机程序语言设计基础 7 for i 1 to 2 for j i 1 to 3 t a j i a j i a i j a i j t next j next i print for I I to 3 for j 1 to 3 print a i j next j print next i end sub 程序运行后 窗体中显示的是 18 在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮 然后编写如下事件过程 Private Sub Command1 Click Dim arr 5 As Integer n As Integer For i 1 To 5 arr i i 1 Next fun arr n Text1 Text Str n End Sub 程序运行后 单击命令按钮 则在文本框中显示的内容是 19 下列程序段的执行结果为 Dim A 10 B 5 For I 1 To 10 A 1 I Next I For J 1 To 5 福建省高职招考信息技术类计算机程序语言设计基础 8 B J J 20 Next J A 5 B 3 Print A 5 A 5 20 DIM A 10 AS INTEGER FOR I 1 TO 10 A I I NEXT I PRINT A I 则程序运行输出结果为 21 在窗体上画一个名称为Text1的文本框和一个名称为 Command1的命令按钮 然后编写如下事件过程 Private Sub Command1 Click Dim array1 10 10 As Integer Dim i j As Integer For i 1 To 3 For j 2 To 4 array1 i j i j Next j Next I Text1 Text array1 2 3 array1 3 4 End Sub 程序运行后 单击命令按钮 在文本框中显示的值是 22 在窗体上画一个命令按钮 Command1 然后编写如下代码 Private Sub Command1 Click Dim a 5 5 For i 1 to 3 For j 1 to 4 a i j i j Next j Next i For n 1 to 2 For M 1 to 3 Print a M n Next M 福建省高职招考信息技术类计算机程序语言设计基础 9 Next n End Sub 程序运行后 单击命令按钮 输出结果为 23 下列 Visual Basic 程序执行的结果 Dim M 10 K 0 P 10 For J 1 To 10 If J Mod 3 0 Then K K 1 M K J Else M P J P P 1 End If Next J Print M 3 M 6 24 下述单击命令按钮后的输出结果 Private Sub Command1 Click Dim arr1 10 As Integer arr2 10 As Integer n 4 For i 5 To 1 step 2 arr1 i i arr2 n 2 n i Next i Print arr2 n arr1 n End Sub 25 以下程序运行的结果是 Private sub command1 click Dim Fib 10 AS Integer Fib 1 1 fib 2 1 for i 3 To 20 Fib i Fib i 1 Fib i 2 Next i Print Fib 12 福建省高职招考信息技术类计算机程序语言设计基础 10 End sub 26 Private Sub Command1 Click Dim A 1 To 5 As Integer Dim x As Integer For I 1 To 5 A I I Next I I 1 Do While x a i 1 And a i a i 1 Then s s a i Count Count 1 End If Next i Print s Count 2 Option Base 1 Private Sub Cmd1 Click DIM a A array 1 2 3 4 0 6 7 8 0 1 0 FOR k 1 TO 10 Select Case SGN a k Case 1 S S a k Case 0 S S 1 福建省高职招考信息技术类计算机程序语言设计基础 12 Case 1 S S a k End Select NEXT k Print S S 28 设有如下程序 private sub form click dim a a array 1 2 3 4 5 6 7 8 9 for i 0 to 3 print a 5 i next i end sub 程序运行后的输出结果是 29 以下程序运行后 单击窗体输出的结果是 Option Base 1 Private Sub Form Click Dim a a Array 19 17 15 13 11 9 7 5 3 11 For i 1 To 10 If a i 3 a i 3 Or a i 5 a i 5 Then Sum Sum a i End If Next i Print Sum End Sub 30 以下程序运行结果是 Dim a As Variant b As Variant c 1 3 As integer a Array 3 25 6 34 b Array 23 56 32 12 For j 0 to 3 C 0 j a j C 1 j b j Next j m c 1 1 for i 0 to 1 福建省高职招考信息技术类计算机程序语言设计基础 13 for j 0 to 3 if m c i j then m c i j next j i print m- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 高职 招考 计算机 程序设计 数组 知识
装配图网所有资源均是用户自行上传分享,仅供网友学习交流,未经上传用户书面授权,请勿作他用。
关于本文