计算机公共基础-刘钢第12章课件.pptVIP

第12章 QBASIC的数组和过程 学习目标 掌握数组的概念、定义与引用 掌握一维数组的应用 了解二维数组 了解过程的概念和调用 第12章 QBASIC的数组和过程 教学内容 12.1 一维数组 12.2 二维数组 12.3 过程 本章小结 12.1 一维数组 数组的特点与作用 数组属于构造数据类型，用于保存一组在逻辑上有内在联系的数据。 数组中的每个元素具有相同名字(数组名)，类型、长度相同，通过不同的下标加以区分。 一个数组中的所有元素在内存中连续存储，通过数组名和下标引用数组中的元素。 数组在使用前必须先定义(声明)，说明所使用数组的名字、类型、维数和下标的取值范围。 12.1 一维数组 — 数组的定义 DIM [SHARE] 数组名 ([下界 TO] 上界) AS 类型 SHARE声明全局数组，可在各个过程中使用 下界的默认值为0 一维数组只有一个下标 一个DIM语句可定义多个数组（用逗号分隔） 例： DIM Stu(2000) AS INTEGER DIM Mark(-6 TO 6) AS SINGLE DIM A(20) AS DOUBLE, B(30) AS LONG 12.1 一维数组 — 数组的定义 说明-1 定义数组时可使用类型符，如：DIM A#(20) QB一维数组的元素最多为32767个。如果下标的下界为0，则下标上界最大为32766。 定义数组时，下标的上/下界可使用常量、变量或表达式，例如 DIM N N=123.78 DIM A(N) AS INTEGER, B(N*10-1) AS INTEGER 数组定义后，数值型数组各元素被清零，字符串数组各元素为“”(空串)。 12.1 一维数组 — 数组的定义 说明-2 使用函数UBOUND()、LBOUND()可获得所定义数组下标的上界和下界。例如： DIM Test(-3 TO 3) DIM I AS INTEGER FOR I = LBOUND(Test) TO UBOUND(Test) Test(I) = 10 * I NEXT I FOR I = LBOUND(Test) TO UBOUND(Test) PRINT Test(I); NEXT I 12.1 一维数组 — 数组元素的引用 引用就是给数组元素赋值 通过数组名和下标可确定数组中的一个元素 例：用数组求3个元素的和 DATA 10, 30, 60 DIM TEST(3) AS INTEGER READ TEST(1), TEST(2), TEST(3) TEST(0)= TEST(1)+TEST(2)+TEST(3) PRINT TEST(0) END 12.1 一维数组 — 数组元素的引用 例1：读入10个成绩，统计并输出=平均分的成绩及人数 DIM TEST(10) AS INTEGER, Sum AS INTEGER DIM Counter AS INTEGER, Average AS SINGLE, I AS INTEGER Sum = 0 : Counter = 0 FOR I = 1 TO 10 数组赋值并累加 READ TEST(I) ：Sum = Sum + TEST(I) NEXT I Average = Sum / 10 FOR I = 1 TO 10 统计、输出 IF TEST(I) = Average THEN PRINT “Data=”; TEST(I) ：Counter = Counter + 1 END IF NEXT I PRINT Counter=; Counter DATA 69, 90, 64, 88, 85, 56, 60, 75, 100, 72 END 12.1 一维数组 — 数组元素的引用 例2：向数组赋N个2位随机正整数，然后颠倒顺序输出。 DIM N AS INTEGER, T AS INTEGER INPUT N=, N DIM D(N) AS INTEGER, I AS INTEGER RANDOMIZE TIMER 随机数初始化 FOR I = 1 TO N D(I) = 10 + 90 * RND 确保D(I)是一个两位数 NEXT I FOR I = 1 TO N : PRINT D(I); : NEXT I 输出原始数据 FOR I = 1 TO N / 2