Pascal006_2数组

【例6-3-4】输入十个整数，将它们按照升序排列后输出。
B. 算法
定义数组，输入数据；
(1)
I
选择法排序；
(2)
输出升序序列。
(3)
循环：i从1到9
[ 求a[i]到a[10]中的最小值a[k]；
Begin for i := 1 to 30 do read( a[i]);
End.
【例6-3-2】一维数组输入和输出
Type arr1 = array[ 'a'..'z' ] of integer;
Var a : arr1; i : char ;
Begin for i := 'a' to 'z' do read( a[i]);
Var score：arr；
Begin …
score[ Eng ] 95
score[ Eng ] := 95;
score[ Math ] 100
score[ Math ] := 100; score[ CHN ] := 80;
score[ CHN ]
80
…
end.
6.3.4 数组的运算
➢同类型的数组可以整体赋值
End.
6.3.1 数组的概念
基类型 •数组：同一数据类型，多个数据的有序集合 •元素：构成数组的每个数据项称为数组元素
基本数据类型
构造数据类型
6.3.2 数组的类型和变量说明
1. 类型说明 2. 变量说明
Type 类型标识符 = array [下标类型] of 基类型；
Var
变量标识符[, 变量标识符..] : 类型标识符
6.3 数组类型
数组的概念 【引例】求30个数中的最小值 数组的使用 Program max30; 数组的应用 Var a1, a2, … , a30, min: integer;
Begin readln (a1, a2,… , a30); min=a1; if min > a2 then min := a2; if min > a3 then min := a3; … if min > a30 then min := a30; writeln ( '最小值为', min);
for i := 'a' to 'z' do write( a[i] : 4 );
End.
练习
输入50个整数，反序输出
十进制数转换成十六进制
16 17886 16 1117 16 69 16 4 0
……14 ……13
……5 ……1
输入十进制数x
当x<>0循环【 除以16； 记录余数； x计算商；
】
第6章 构造数据类型
6.3 数组类型
数组的概念 数组的使用 【引例】求三个数中的最小值 数组的应用 Program max3;
Var a, b, c, min: integer; Begin
readln (a, b, c); min=a; if min > b then min=b; if min > c then min=c; writeln ( '最小值为', min); End.
➢整体数组是不能作其它运算的，也不能整 体读、写。
➢对数组的读、写、赋值和其它运算，通常 都是对数组的每个元素进行的。
➢数组元素可以进行和基类型相同的运算。
6.3.5 数组的输入输出
输入和输出经常借助于循环语句实现
Type arr1 = array[ 1..30 ] of integer;
Var a : arr1; i : integer;
定义整型数组，输入数据；
(1)
I
选择法排序；
(2)
输出升序序列。
(3)
15 6 27 58 19 36 70 45 82 1
1 6 15 19 27 36 45 58 70 82
(1) 取十个数中的最小值； (2) 移动到第一位； (3) 取剩余九个数中的最小值； (4) 移动到第二位； (5) ……
例 Type Var
Arr1 = array[char] of real; Arr2 = array[1..3] of integer; a1:Arr1 ; x1, a2 : Arr2 ;
3. 注意
(1)下标可以是boolean，char或用户自定义的枚举
类型和子界类型等，值的个数有限的类型。 (2)每个数组中元素的个数保持不变，称其为数组的
II
②
循若环a[：2]<i从m2in到，3则0 m[ in←a[2]；k←2; 若a[i]< min 则 [
… ……min ← a[i];
若ak[3←0]i<; min，则min←a[30]；k←30;
]
]
}
【例6-3-4】输入十个整数，将它们按照升序排列后输出。
A. 分析
采用选择法排序
B. 算法
长度。 (3)数组中的元素用数组名和下标表示。
Type Var
Arr1 = array[char] of real; Arr2 = array[1..3] of integer; a1:Arr1 ; a2 : Arr2 ;
a2[1] a2[2] a2[3]
3. 注意
(4)数组的基类型可以是任何类型，包括数组类型和
反向输出所以余数
一维数组的应用举例 【例6-3-3】求30个数中的最小值
a[1] a[2] a[3] 351
……
a[28] a[29] a[30]
……
6 10 7
3 min
(1) 分析：
采用“擂台赛”思想
(2) 算法
C. 编码
定义பைடு நூலகம்组，输入数据；
(1)
I
求最小值；
(2)
输出结果。
(3)
① min←a[1]; k←1;
b[3,1 ]
b[4,3 ]
6.3.3 数组的访问及存储
数组的存储方式为：
内存
按行存储
连续存储
在编译阶段，计算机 根据数组的类型说明，确 定其存储空间的大小，为 其分配空间。
……
b[1, 1 ] b[1, 2 ] b[1, 3 ] b[2, 1 ]
……
【例6-3-1】数组定义举例
Type Subject = ( Eng , Math, CHN )； arr = array[ Subject ] of integer；
其他类型。
例 Type var
a2
Arr2 = array[1..3] of integer; Arr3 = array[1..4] of Arr2; //二维数组
Arr4 = array[1..4, 1..3] of integer; a2 : Arr2; b, a3:Arr3;
b
b[1,1 ]
b[2,2 ]