COBOL-练习题-附加题

附加题-01编写一个程序完成以下功能：1. 接收一个日期型数据（YYYYMMDD）2. 判断数据是否符合以下要求，如不符合，程序中断运行，输出提示信息日期输入有误。a) 接收的日期要小于当前系统日期b) YYYY 1900c) MM = 12d) DD 100003 的所有记录，并显示输出。FILE1(KSDS)ACCOUNT(账号) 9(06)NAME(姓名) X(10)AMOUNT(金额) 9(04)V9(02)100001WANGMIN222277100002LIHAI673466100003TIANLI009972100004GAOHAI423774100005BAIWEI234673100006LIFU234567附加题-05 编写一个程序完成以下功能：1. 找出1100内所有的素数，并显示输出。附加题-06 编写一个程序完成以下功能：1. 接收一个天数的9（03）数值型数据。2. 计算出是多少周零多少天。如：a) 接收 014 输出显示：2 WEEKS + 0 DAYb) 接收 017 输出显示：2 WEEKS + 3 DAYc) 接收 005 输出显示：0 WEEKS + 5 DAY附加题-07 编写一个程序完成以下功能：1. 已知文件FILE1(ESDS)格式如下2. 找到文件中AMOUNT(金额) 值为最大的记录，输出显示该记录的ACCOUNT(账号)3. 找到文件中AMOUNT(金额) 值为最小的记录，输出显示该记录的ACCOUNT(账号) FILE1(ESDS)ACCOUNT(账号) 9(06)NAME(姓名) X(10)AMOUNT(金额) 9(04)V9(02)100001WANGMIN222277100002LIHAI673466100003TIANLI009972100004GAOHAI423774100005BAIWEI234673100006LIFU234567附加题-08 已知员工加班记录文件FILE1(KSDS)，编写程序计算员工加班费。1. 主程序要求如下：a) 读入员工加班记录文件FILE1(KSDS)中员工编号大于00100的所有记录b) 调用子程序1，将读取的记录传送到子程序1c) 从子程序1中得到加班总数d) 调用子程序2，将从子程序1中得到加班总数 传送到子程序2e) 从子程序2中得到加班费f) 将记录写入FILE2(KSDS)中2. 子程序1要求如下：a) 接收从主程序传送过来的记录信息b) 计算每个记录的加班总数c) 将计算好的加班总数返回给主程序3. 子程序2要求如下：a) 接收从主程序传送过来的加班总数b) 根据公式计算加班费c) 将计算好的加班费返回给主程序FILE1(KSDS)员工编号9(05)员工姓名X(10)平日加班9(03)休日加班9(03)00010WANGMIN01000500020LIHAI02000800110TIANLI03001200120GAOHAI04001500130BAIWEI05001600140LIFU060024计算公式：1. 加班总数 = 平日加班 + 休日加班 * 22. 加班费：a) 0 加班总数=30：加班费 = 加班总数 * 15b) 30加班总数=