% t4.m参考程序(考虑了多人最高、最低等情况):
% 请看懂!!!能编最好!
function t4()
clc
%---------start 初始化---------------
row=input('输入学生人数:');
col=input('输入课程数目:');
score=fix(rand(row,col)*49)+49;
xh0=1:row;
kch0=1:col;
for ii=1:row
zcj_pre(ii)=sum_(score(ii,:));
end
disp('原始成绩表:')
disp([xh0' score zcj_pre']);
%---------end 初始化--------------------
% 调用tongji1
[c_max,index_max,c_min,index_min,c_ave]=tongji1(score);
disp('平均分统计:')
fprintf(' 课程 平均\n');
% 按以上格式输出
disp([kch0',round(c_ave)']);
disp('课程最高分统计:')
fprintf(' 课程 最高 学号\n');
for jj=1:col
fprintf(' %d %d ',kch0(jj),c_m