练习题：成绩统计（原来Lazarus的编程效率可以很高的）

mutou · 发表于 2009-11-2 18:47:26

题目：成绩统计

成绩统计文件内容如附件Score_In.txt所示，请按下面的要求统计总分、排列名次。生成的文件格式须与原文件一致。

主修课直接累加：德育、语文、外语、数学、物理、化学
辅修课乘以0.5后累加：历史、地理、生物、体育
选修课得A加10分，得B加5分，得CD不加分，如果选修课累加分大于等于20，则总共只向总分加20分：音乐、美术、信息技术
按照总分从高到低排名次，总分相同则名次相同。

评分标准：
1、只使用Lazarus自带的单元；
2、执行代码小于40行为及格。

原始数据

结果数据

老师说begin和end中间的代码以及变量定义的代码加一起不允许超过40行，我怎么都写不出那么精简的代码，是老师在忽悠我们还是真的可以那么精简，我想如果允许使用正则表达式和表达式计算组件，也许能够写到那么简洁，如果就只是math、strutils等，真能够有这么高的效率？

下载测试数据和题目说明

damcool · 发表于 2009-11-13 14:40:59

没意思的，关键是代码可维护性

涛 · 发表于 2009-11-15 22:56:01

居然有行数要求，排除文件读取和变量定义，排序20行左右，也差不多。。。。。
Pascal应该有排序函数的。。。。

lz_whj · 发表于 2010-4-22 15:56:27

试试看

nelsonchan · 发表于 2010-8-24 23:38:25

谢谢楼主,学习了.

s_guang · 发表于 2010-10-26 10:44:36

不错，实例学习了！

songzh1436 · 发表于 2010-10-29 18:56:54

学习一下，刚刚开始。

原始外星人 · 发表于 2010-11-18 20:38:32

附NOI练习题

复制代码

这是NOI的难度吗……

y761823 · 发表于 2011-1-3 22:39:45

pascal没有排序函数把

slmrj · 发表于 2011-1-7 19:00:52

看看看.再说

		自动登录	找回密码
密码			立即注册（注册审核可向QQ群索取）

练习题：成绩统计（原来Lazarus的编程效率可以很高的）

本帖子中包含更多资源

评分