不是VIP会员,不能显示答案

题目解答

题目:
【海岛建设】(2+2+2+2+2+2=10)
牛背群岛是由一大批大小接近的小岛屿组成的,涨潮时群岛中的每个小岛都会有一部分被淹入海水下面(有些特别矮小的小岛甚至整个淹入水下) ,退潮时这些小岛上被淹的部分又能露出了海面。为了打造特色旅游景观,政府计划在每次涨潮时被淹入水下的那些部位安装彩色灯光装置,这样在涨潮时这些部位就会在水下发出光彩夺目的景观。
现在味味已经从测绘公司得到了所有这些小岛的海拔高度, 而且将这些数据进行了量化预处理。作为程序员,味味需要统计所有这些小岛中,量化高度在 2 和 5 之间(包括 2和 5)的小岛数量总共有多少个。
下面是味味编写了一部分的程序,程序先读入牛背群岛所组成的方阵的规模 n(牛背
群岛的各个小岛刚好组成了一个 n*n 的方阵),然后以一个方阵的格式依次读入 n*n 个小岛各自的量化高度(详细可见输入和输出样例) ,程序最后应能输出量化高度不小于 2 并且不大于 5 的所有小岛的总数。
请你帮助味味完成下面的程序。
输入样例:
5
1 2 3 5 2
7 4 2 3 6
2 1 3 6 5
1 1 5 3 4
11 9 1 4 5
输出样例:
15
program test5; 
var n,i,j,s:integer; 
a:array[1..10,1..100]of integer; 
begin 
 read(n) ; 
for i:=1 to n do 
  begin 
     for j:=1 to n do  read(a[i,j]) ;
         readln; 
end; 
s:=0; 
for i:=1 to n do 6 
   for j:=1 to     n   do 
if (a[i,j]>=2) and ( a[i,j]<=5  )then  inc(s) ;
writeln(s); 
end. 
考点:
分析:
解答:
评论:
老师: