代碼如下:
Dim Max As Integer
Dim Min As Integer
Max=Num(0)
Min=Num(0)
For i= 1 To 99
If Num(i)>Max Then Max = Num(i)
If Num(i) Next 1 Print“最高分是:” & Max Print“最低分是:” & Min 代碼中定義了變量Max來(lái)保存最高分,并且將第一個(gè)學(xué)生的成績(jī)(保存在元素Num(0)中)賦給它。然后使用For循環(huán)語(yǔ)句讓變量Max與數(shù)組的其他元素依次比較。在循環(huán)語(yǔ)句中又使用了If…Then語(yǔ)句來(lái)判斷其他元素與Max的大小,如果某元素比Max大,則將該元素的值賦給Max,Max再以這個(gè)值同其他元素進(jìn)行比較。因此,在比較結(jié)束后,Max中保留的是所有元素中最大的值。 變量Min用來(lái)保存最低分,算法與求最高分的算法類似。 2.多維數(shù)組 聲明多維數(shù)組的形式如下 Dim<數(shù)組名>(下標(biāo)1,下標(biāo)2,…)As<數(shù)據(jù)類型>. 其中下標(biāo)的形式與一維數(shù)組中的下標(biāo)相同,下標(biāo)的個(gè)數(shù)決定了數(shù)組的維數(shù)。 多維數(shù)組的大小為每一維的大小乘積,每一維大小為(上界一下界)+1. 例如: Dim A(3,3 To 5) As Integer. 聲明了一個(gè)整型二維數(shù)組,數(shù)組的大小為(3-O+l)X(5-3+1)=12.其中各元素如表3.10所示。 又如: Dim B(2,3,4) As String 聲明了一個(gè)字符串型三維數(shù)組,數(shù)組的人小為3*4*5=60. 與變量相同,數(shù)組的作用范圍也是由其聲明方式與聲明位置決定的,即: 建立全局?jǐn)?shù)組,在模塊的聲明段用Public語(yǔ)句聲明數(shù)組。 建立模塊級(jí)數(shù)組,在模塊的聲明段用Private語(yǔ)句聲明數(shù)組。 建立局部數(shù)組,在過(guò)程中用Dim語(yǔ)句或Static語(yǔ)句聲明數(shù)組。
2010年9月計(jì)算機(jī)等級(jí)考試成績(jī)查詢時(shí)間匯總
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |