题1811：【入门】语文成绩
【试题描述】
给出N(5 <= N <= 150)个人的语文成绩，求N个人的语文总分和平均分，并按成绩高低排序后输出。

【输入描述】
第1行：一个整数N。

第2行：空格隔开的N个整数，表示N个人的语文成绩。

【输出描述】
三行。

第1行：一个整数，为N个人的总分。

第2行：N个人的语文平均分，保留两位小数。

第3行：N个空格隔开的整数，为从高到低输出的N个人的成绩。

【输入样例】
5
72 98 95 81 86
【输出样例】
432
86.40
98 95 86 81 72
program zf_pjf;
var n,s,i,j,t:integer;
a:array[1..150] of integer;
begin
read(n);
s:=0;
for i:=1 to n do
begin
read(a[i]);
s:=s+a[i];
end;
writeln(s);
writeln(s/n:0:2);
for i:=1 to n-1 do
for j:=i+1 to n do
if a[i]<a[j] then begin t:=a[i];a[i]:=a[j];a[j]:=t; end;
for i:=1 to n-1 do
write(a[i],' ');
write(a[n]);
end.
题1646：【入门】总分和平均分
【试题描述】
有N( 1 < N <= 150 )个人,M( 2 < M <= 50 )科成绩，计算N个人的总分、平均分及M科成绩的总分、平均分。

【输入描述】
第1行：2个整数N M。

第2..N+1行：每行M个整数，第i+1行为第i个人的M科成绩。

【输出描述】第1..N+M+1行：每行两个数，为总分和平均分，平均分保留3位小数。

【输入样例】
3 2
90 91
80 85
73 82
【输出样例】
181 90.500
165 82.500
155 77.500
243 81.000
258 86.000
【解题提示】
输出说明：
前N行为N个人的总分、平均分；后M行为M科成绩的总分、平均分。

program zf_pjf;
var n,m,s,x,i,j:integer;
a:array[1..50] of integer;
begin
read(n,m);
fillchar(a,sizeof(a),0);
for i:=1 to n do
begin
s:=0;
for j:=1 to m do
begin
read(x);
s:=s+x;
a[j]:=a[j]+x
end;
writeln(s,' ',s/m:0:3);
end;
for i:=1 to m do
writeln(a[i],' ',a[i]/n:0:3) ;
end.。