C语言大赛 第七题

昨天发帖子下面出个C语言大赛，看了下，做了其中的第七题，没想到过期了，发布在这里吧，程序代码如下，用习语言编译工具编译：

第七题程序，原题描述：
文件data.in中保存有m (m < 2000) 个数据行，每行最多包含25个由空格分隔的正整数。
给出整数k(k <26)，计算文件中第k列所有数据的最大值、最小值和平均值。
最大值和最小值以整数格式输出，平均值保持两位小数。若某行的列数小于k，则认为该行第k列的值为0
〖
#包含 “习语言系统.接口”

字符串类型 输入文件名 = “data.in”；
#定义 最大行 2000
#定义 最大列 25
#定义 行最大字节数 2048
#定义 缺省进制 10
整数类型 主函数（整数类型 参数个数， 字符串类型 参数[] ）
{
整数类型 输入数据[最大行][最大列], 行，行数， 列， 数字， 最大值=-1， 最小值=-1;
字符类型 输入行[行最大字节数], *指针；
文件类型* 输入文件；
小数类型 总和 = 0；

输出字符串并换行("第七题程序处理开始，使用中文c-习语言编译工具编译");
【先都初始化为 0】
步进循环（ 行 = 0； 行 小于 最大行； 行 加加 ）
{
步进循环（ 列 = 0； 列 小于 最大列； 列 加加 ）
输入数据[行][列] = 0；
}
输入文件 = 文件打开（ 输入文件名， “读”）；
如果（ 输入文件 等于 空指针 ）
{
格式输出（ “无法打开文件%串%行”，输入文件名）；
返回 1；
}
行=-1， 列=0；
重复{
如果（ 文件读字符串（ 输入文件， 输入行， 行最大字节数 ） ）
{
如果（ 行 小于 最大行-1 ）行 ++， 列 = 0；
否则 跳出；

指针 = 输入行；
当（ 字符串长度（指针） 大于 0 ）
{
数字 = 字符串转整数（ 指针， 缺省进制 ， & 指针 ）；
格式输出（“行 %整 ：数字=%整%行”，行， 数字 ）； 【调试用，可屏蔽】
如果（ 列 小于 最大列 ）输入数据[行][列++] = 数字；
当（*指针 并且 ！是半角数字（ *指针） ）指针 ++；
}
}
}直到（ 文件结束（输入文件） ）；
文件关闭（ 输入文件 ）；
行数 = 行+1；

格式输出（“行数 %整 ：数字=%整%行”，行数，输入数据[行][0] ）； 【调试用，可屏蔽】

重复{
格式输出（ “请输入列：”）；
格式输入（ “%（整数）”， 取地址 列）；
如果（列 小于 1 或 列 大于 最大列 ）
格式输出（ “输入错误，必须大于0 小于 %整 %行”， 最大列+1 ）；
}直到（ 列 大于 0 并且 列 小于等于 最大列 ）；
列 -= 1；

步进循环（ 行 = 0； 行 小于 行数； 行 加加 ）
{
总和 += 输入数据[行][列] ；
格式输出（ “总和=%小， 行=%整，数据= %整 %行”， 总和， 行， 输入数据[行][列] ）； 【调试用，可屏蔽】
如果（ 最大值 小于 0 ）最大值 = 输入数据[行][列]；
或者（ 最大值 小于 输入数据[行][列] )最大值 = 输入数据[行][列]；

如果（ 最小值 小于 0 ）最小值 = 输入数据[行][列]；
或者（ 最小值 大于 输入数据[行][列] ）最小值 = 输入数据[行][列]；
}
格式输出（ “计算结束，第%整列总和=%小，平均值=%小， 最大值=%整，最小值=%整 %行”，列， 总和， 总和/行数， 最大值， 最小值 ）；
暂停（）；
返回 0;
}
〗
data.in 内容：
2 5 7 23 444 92 2 54
33 4 82 11
44 5 7 9 36 711
3 4 111 333 21 66
4 4 555 55 5

运行结果：
第七题程序处理开始，使用中文c-习语言编译工具编译
行 0 ：数字=2
行 0 ：数字=5
行 0 ：数字=7
行 0 ：数字=23
行 0 ：数字=444
行 0 ：数字=92
行 0 ：数字=2
行 0 ：数字=54
行 1 ：数字=33
行 1 ：数字=4
行 1 ：数字=82
行 1 ：数字=11
行 2 ：数字=44
行 2 ：数字=5
行 2 ：数字=7
行 2 ：数字=9
行 2 ：数字=36
行 2 ：数字=711
行 3 ：数字=3
行 3 ：数字=4
行 3 ：数字=111
行 3 ：数字=333
行 3 ：数字=21
行 3 ：数字=66
行 4 ：数字=4
行 4 ：数字=4
行 4 ：数字=555
行 4 ：数字=55
行 4 ：数字=5
行数 5 ：数字=4
请输入列：3
总和=7.000000， 行=0，数据= 7
总和=89.000000， 行=1，数据= 82
总和=96.000000， 行=2，数据= 7
总和=207.000000， 行=3，数据= 111
总和=762.000000， 行=4，数据= 555
计算结束，2列总和=762.000000，平均值=152.400000， 最大值=555，最小值=7
按任意键继续