聪明人的游戏 上课稿第14课.pptVIP

齐齐量身高 算算平均身高 及时充电（数组） 当要存放相同意义的一批数据时，我们使用数组。一个数组相当于一个表格，我们称数组的一个“格子”为一个元素，每个数组元素都有一个唯一的编号，它通常称为下标。 数组的说明 数组变量可以存放很多数据，但它也跟普通变量一样，要先说明后使用，并且说明元素个数要足够用。 说明格式： var 数组名表：array[编号范围] of 元素类型 示例： var tz,sg:array[1..50] of integer 数组使用 1、向数组存入元素 因为一个数组含有多个元素，通常通过循环控制对每个元素的进行输入或赋值。但对两个类型、大小完全相同的数组变量，也可以相互赋值。 2、输出数组元素 要把整个数组的数据输出，一般也要使用循环语句来控制。 3、数组元素的使用 每一个数组元素就是存放一个数据的变量，可以输入、输出和参与各种运算。 探索奥秘 找找谁的身高超过全家的平均身高 输入样例： 输出样例： 175 160 172 158 178 162 142 AV=163.9 1:175 3:172 5:178 把小冬冬一家人的身高按从高到低排列出来 输入样例： 输出样例： 175 160 172 158 178 162 142 178 175 172 162 160 158 142 展示实力（写出程序运行结果） 展示实力（编写程序） 1、小明家共有6个人，你能编写程序算出全家的平均身高吗？ 2、把小明家人的身高数据存入到一个数组中，然后从中找出最高的身高数据。 * * 142 小冬冬 7 162 妈妈 6 173 爸爸 5 158 外婆 4 172 外公 3 160 奶奶 2 175 爷爷 1 身高(cm) 成员 编号 小冬冬一家子的身高 Program P1_14_2； var k：integer; s:real; {s记录身高总和} tall:array[1..7] of integer; Begin writeln(‘qing shuru 7 ge ren de shengao:’); for k:=1 to 7 do read(tall[k]); s:=0; for k:=1 to 7 do s:=s+tall[k]; writeln(‘Pingjun shengao:’,s/7:0:1); End. 9 5 10 7 6 2 3 96 185 142 132 178 158 172 160 175 1 2 3 4 5 6 7 8 9 编号（下标） 数组元素 Program P1_14_3； var n,m：integer; w:array[1..10] of integer; Begin w[1]:=0; w[2]:=1; for n:=3 to 10 do w[n]:=w[n-2]+w[n-1]; for n:=1 to 10 do write(w[n]:4); End. 写出程序的运行结果 0 1 1 2 3 5 8 13 21 34 Program P1_14_4； var n,at：integer; { at 用于累计身高} t:array[1..7] of integer; {t 用于存放身高} Begin for n:=1 to 7 do read(t[n]); at:=0; for n:=1 to 7 do at:=at+t[n]; writeln(‘AV=’,at/7:0:1); for n:1 to 7 do if t[n]at/7 then write(n,’:’,t[n],’ ’); writeln; End. Program P1_14_5； var n,m,temp：integer; { at 用于累计身高} t:array[1..7] of integer; {t 用于存放身高} Begin for n:=1 to 7 do read(t[n]); for n:=1 to 6 do for m:=n+1 to 7 do if t[m]t[n] then begin temp=t[n];t[n]=t[m];t[m]=temp; end; for n:1 to 7 do