现在中考结束了。6月成绩出来时,我是用循环解决的
只求每天有一丁点儿的进步就可以了
**************** *分数段统计 **************** CLOSE DATABASES SET SAFETY off *--------------- *设定统计范围 SELECT 0 USE fsdk ZAP FOR i=560 to 300 step -1 &&& I 的二个起止数决定统计的范围,步长决定分数段大小 APPEND BLANK REPLACE zf with i ENDFOR GO top *--------------- *计算每一分的累计人数 SELECT 0 USE bmk SELECT fsdk SCAN SELECT bmk COUNT to nn for bmk.zf>=fsdk.zf SELECT fsdk REPLACE ljrs with nn ENDSCAN SELECT bmk USE *---------------- *计算每一分的小计人数 SELECT fsdk GO top REPLACE xjrs with ljrs sn=ljrs DO while not EOF() SKIP 1 REPLACE xjrs with ljrs-sn sn=ljrs ENDDO *---------------- REPORT FORM rep_fsd noeject noconsole prev