Lazarus中文社区

 找回密码
 立即注册(注册审核可向QQ群索取)

QQ登录

只需一步,快速开始

版权申明
查看: 13516|回复: 14

练习题:成绩统计(原来Lazarus的编程效率可以很高的)

[复制链接]

该用户从未签到

发表于 2009-11-2 18:47:26 | 显示全部楼层 |阅读模式
题目:成绩统计

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

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

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



原始数据  



结果数据

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

下载测试数据和题目说明

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?立即注册(注册审核可向QQ群索取)

x

评分

参与人数 1威望 +5 收起 理由
猫工 + 5

查看全部评分

回复

使用道具 举报

该用户从未签到

发表于 2009-11-13 14:40:59 | 显示全部楼层
没意思的,关键是代码可维护性
回复 支持 反对

使用道具 举报

  • TA的每日心情
    奋斗
    2022-6-24 15:56
  • 签到天数: 10 天

    [LV.3]偶尔看看II

    发表于 2009-11-15 22:56:01 | 显示全部楼层
    居然有行数要求,排除文件读取和变量定义,排序20行左右,也差不多。。。。。
    Pascal应该有排序函数的。。。。
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    发表于 2010-4-22 15:56:27 | 显示全部楼层
    试试看
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    发表于 2010-8-24 23:38:25 | 显示全部楼层
    谢谢楼主,学习了.

    回复 支持 反对

    使用道具 举报

    该用户从未签到

    发表于 2010-10-26 10:44:36 | 显示全部楼层
    不错,实例学习了!
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    发表于 2010-10-29 18:56:54 | 显示全部楼层
    学习一下,刚刚开始。
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    发表于 2010-11-18 20:38:32 | 显示全部楼层
    1. 附NOI练习题
    复制代码
    这是NOI的难度吗……
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    发表于 2011-1-3 22:39:45 | 显示全部楼层
    pascal没有排序函数把
    回复 支持 反对

    使用道具 举报

    该用户从未签到

    发表于 2011-1-7 19:00:52 | 显示全部楼层
    看看看.再说
    回复 支持 反对

    使用道具 举报

    *滑块验证:

    本版积分规则

    QQ|手机版|小黑屋|Lazarus中国|Lazarus中文社区 ( 鄂ICP备16006501号-1 )

    GMT+8, 2024-3-19 14:52 , Processed in 0.036427 second(s), 13 queries , Redis On.

    Powered by Discuz! X3.4

    Copyright © 2001-2021, Tencent Cloud.

    快速回复 返回顶部 返回列表