上线人数pascal余姚中学高三全省联考刚刚结束，经过各科老师的努力，各个学科的改卷工作终于结束了，每位同学的各科分数也已经结算完毕。此时，校长拿到了清华大学的理科预估分数线k，可是每位同学的总分还没有计算出来。每位同学共有m门成绩，包括语文、数学、外语、综合、IB模块等。校长请你帮忙，统计一下，总分可以达到清华大学分数线的第一行三个整数n，m和k，分别表示参加考试的人数，考试门数和预估分数线。1
2019-04-28
上线人数pascal
余姚中学高三全省联考刚刚结束，经过各科老师的努力，各个学科的改卷工作终于结束了，每位同学的各科分数也已经结算完毕。此时，校长拿到了清华大学的理科预估分数线k，可是每位同学的总分还没有计算出来。每位同学共有m门成绩，包括语文、数学、外语、综合、IB模块等。
校长请你帮忙，统计一下，总分可以达到清华大学分数线的
第一行三个整数n，m和k，分别表示参加考试的人数，考试门数和预估分数线。
1<=n<=1000, 3<=m<=7，600<=k<=810，。
接下来n行，每行m个整数，表示每位同学的m门学科的成绩。成绩0<=x<=300。
同学人数。（总分大于或等于分数线即可）
优质解答
var n,m,k,i,j,t,s:longint;
a:array[3..7]of longint;
begin
readln(n,m,k);
for i:=1 to n do begin
for j:=1 to m do read(a[i]);
for j:=1 to m do t:=t+a[i];
if t>k then inc(s);
end;
writeln(s);
end.
var n,m,k,i,j,t,s:longint;
a:array[3..7]of longint;
begin
readln(n,m,k);
for i:=1 to n do begin
for j:=1 to m do read(a[i]);
for j:=1 to m do t:=t+a[i];
if t>k then inc(s);
end;
writeln(s);
end.