1、Pascal變量類型子界類型、數(shù)組類型1目錄子界類型.1 描述.1 定義.2 習(xí)題 1 年級(jí)人數(shù).4數(shù)組類型.5 描述.5 定義.6單擊此處瀏覽目錄第二頁(yè)。2目錄 讀入、輸出.10 定位.16 習(xí)題 2數(shù)字方陣.18單擊此處瀏覽目錄第一頁(yè)。3子界類型之描述 子界類型屬于一種自定義類型，在FreePascal中可以對(duì)變量值得范圍進(jìn)行控制，從而更大可能增加程序的可靠性，不必對(duì)輸入范圍超出可認(rèn)定范圍而枉費(fèi)心血去加判斷語(yǔ)句。同時(shí)，在定義數(shù)組類型的變量中，也需要用到這種子界類型。014子界類型之定義02 子界類型有兩種定義方法分別如下。 第一種： type 名稱 =下界.上界; 變量名:你之前給type

2、后面寫的名字; 例如： type apple=1.100; var score:apple;5子界類型之定義03 第二種： 變量名：下界.上界; 例如： var score:1.100;注意點(diǎn)： 變量范圍必須是字符型或整數(shù)類型。和case語(yǔ)句相同。6習(xí)題 1 年級(jí)人數(shù)04【題目描述】 已知一年級(jí)有400人，二年級(jí)有500人，三年級(jí)501人，四年級(jí)450人，五年級(jí)510人，六年級(jí)600人。輸入年級(jí)數(shù)，之后輸出年紀(jì)人數(shù)。年級(jí)數(shù)必須是1到6,否則報(bào)錯(cuò)?！据斎胍蟆?【輸入樣例1】 一個(gè)1到6的整數(shù)。 6【輸出要求】 【輸出樣例1】 整數(shù)類型，場(chǎng)寬5。 600【輸入樣例2】 【輸出樣例2】 7 （報(bào)錯(cuò)

3、）查看答案7習(xí)題 1 答案04A8數(shù)組類型之描述05 數(shù)組可以被看做同一類型的多個(gè)數(shù)據(jù)的一個(gè)集合。用數(shù)組下標(biāo)（編號(hào)）來(lái)區(qū)分或指定每一個(gè)數(shù)組元素。FreePascal能開數(shù)組空間數(shù)量比Tubbo Pascal多很多。因此，在需要特別多空間進(jìn)行數(shù)據(jù)存儲(chǔ)時(shí)，建議使用FreePascal進(jìn)行程序的編寫。9一維數(shù)組之定義 一維數(shù)組有兩種定義方式，分別如下： 第一種:type 自定義名稱=array下界.上界 of 數(shù)據(jù)類型; var 變量名:自定義名稱; 例如:type dress=array1.100 of integer; var a:dress; 注：剛才我們定義的一維數(shù)組相當(dāng)于一張1行，100列

4、的表格。0610一維數(shù)組之定義 一維數(shù)組有兩種定義方式，分別如下： 第二種:var 變量名:array下界.上界 of 數(shù)據(jù)類型; 例如:var a:array1.100 of longint; 0711二維數(shù)組之定義08 二維數(shù)組有兩種定義方式，分別如下： 第一種:type 自定義名稱=array行下標(biāo)值，列下標(biāo)值 of 數(shù)據(jù)類型; var 變量名:自定義名稱; 例如:type dress=array1.50,1.100 of integer; var a:dress; 注：剛才我們定義的二維數(shù)組相當(dāng)于一張50行，100列的表格。12二維數(shù)組之定義 二維數(shù)組有兩種定義方式，分別如下： 第二種

5、:var 變量名:array行下標(biāo)值，列下標(biāo)值 of 數(shù)據(jù)類型; 例如:var a:array1.50,1.100 of longint; 注：行下標(biāo)值、列下標(biāo)值可以不從1開始。0913一維數(shù)組之讀入、輸出 一維數(shù)組的全部讀入需要一個(gè)循環(huán)變量，下面是讀入所有元素的程序：var a:array1.100 of integer; i:integer;begin for i:=1 to 100 do read(ai);end.1014一維數(shù)組之讀入、輸出 一維數(shù)組的全部輸出需要一個(gè)循環(huán)變量，下面是輸出所有元素的程序（末尾有空格）：var a:array1.100 of integer; i:inte

6、ger;begin for i:=1 to 100 do write(ai, );end.1115一維數(shù)組之讀入、輸出 如果末尾不能有空格，那么程序就是這樣的：var a:array1.100 of integer; i:integer;begin write(a1); for i:=2 to 100 do write( ,ai);end.1216二維數(shù)組之讀入、輸出 二維數(shù)組的全部讀入需要兩個(gè)循環(huán)變量，靠外的一層控制行，另一層循環(huán)控制列，下面是讀入所有元素的程序：var a:array1.100,1.100 of integer; i,j:integer;begin for i:=1 to

7、100 do for j:=1 to 100 do read(ai,j);end. 1317二維數(shù)組之讀入、輸出 二維數(shù)組的全部輸出需要兩個(gè)循環(huán)變量，下面是輸出所有元素的程序（末尾有空格）：var a:array1.100,1.100 of integer; i,j:integer;begin for i:=1 to 100 do for j:=1 to 100 do write(ai,j, );end.1418二維數(shù)組之讀入、輸出 如果末尾不能有空格，那么程序就是這樣的：var a:array1.100,1.100 of integer; i,j:integer;beginfor i:=1

8、to 100 do write(i,1); for j:=2 to 100 do write( ,ai,j);end.1519一維數(shù)組之定位16100999810099.5 a1 a2 a3 a4 a5這是一個(gè)有5個(gè)元素的一維數(shù)組，假如說(shuō)輸出其中一個(gè)元素，那么程序解釋如下： write(a下標(biāo));假如要讀入第五個(gè)元素，那么程序是這樣的，其他操作以此類推： read(a5);20二維數(shù)組之定位1710099.599100100979910099.5969810088959796.521二維數(shù)組之定位 之前呈現(xiàn)的是一個(gè)四行四列的二維數(shù)組，一般輸出某個(gè)內(nèi)容的程序是這樣的： write（行號(hào)，列號(hào)）；例如輸出第三行第四列的程序是： write(3,4);剩下的以此類推。1822習(xí)題2數(shù)字方陣【題目描述】 讀入一個(gè)數(shù)字，利用二維數(shù)組根據(jù)要求和樣例輸出數(shù)字方陣。【輸入要求】 【輸出要求】 一個(gè)整數(shù)。 每個(gè)數(shù)字場(chǎng)寬為三?！据斎霕永?4【輸出樣例】 1 2 3 4 5 6 7 8 9 10 11 12 13 14 45 1619查看答案23習(xí)題 2 答案var a:array1.100,1.100 of integer;