• 所有问题

    • 求VFP编程高手帮助

    老湿叫写一个VFP程序， 我只要编写的内容就行了，需要编写计算成绩程序 要求能计算每个学生的各科成绩的平均分，计算学生人数，最后要能计算平均分在90以上的学生有几个 平均分80分以上的有几个 以此类推...

    今天之内就要... 高手帮助下 写好发我QQ邮箱[email protected]

    举报该问题
    推荐答案   2010-11-08
    假定表中有语文、数学、英语三科成绩，那么
    clear
    use 成绩表
    aver 语文 to yw &&语文平均分
    aver 数学 to sx &&数学平均分
    aver 英语 to yy &&英语平均分
    count all to xs &&计算学生人数
    count for (语文+数学+英语)/3>=90 to rs1
    count for (语文+数学+英语)/3>=80 and (语文+数学+英语)/3<90 to rs2
    count for (语文+数学+英语)/3>=60 and (语文+数学+英语)/3<80 to rs3
    count for (语文+数学+英语)/3<60 to rs4
    ?"语文平均分是：",yw
    ?"数学平均分是：",yw
    ?"英语平均分是：",yw
    ?"总人数是：",xs
    ?"平均分在90分以上有",rs1,"人"
    ?"平均分在80分以上有",rs2,"人"
    ?"平均分在60分以上有",rs3,"人"
    ?"平均分在60分以下有",rs4,"人"
    use
    温馨提示：答案为网友推荐，仅供参考
    其他回答
    第1个回答  2010-11-08
    计算成绩的命令：
    假设数据库中的字段名称为总分，科目有语文、数学、英语等，
    其命令语句为：
    repl all 总分 with 语文+数学+英语
    其余的以此类推
    计算平均分：（以语文为例）
    average 语文 to wypj (其中的变量ywpj是用来存储计算结果的，方便你在程序中调用，其它科目以此类推，这句命令是统计的语文的平均分）
    每个学生的平均分：
    average all 语文,数学,英语 to pjf
    计算学生人数：
    count for 姓名<>"" to rs
    计算平均分在90分以上的学生人数
    count for 平均分>90,其余的以此类推
    第2个回答  2010-11-08
    需要给出表结构
    相似回答
    急求简易VF编程题答案 请高手帮忙答：REPLACE ALL 标注 WITH "中" FOR 工资-2*扣发>=1000 AND 工资-2*扣发<3000 核心语句只有一句话的程序：USE XueSheng REPLACE ALL 标注 WITH IIF(工资-2*扣发>=6000 AND 工资-2*扣发<9900,"优",IIF(工资-2*扣发>=3000 AND 工资-2*扣发<6000,"良",IIF(工资-2*扣发>=1000 AND 工资...
    急求,请教高手VFP问题答：如果表中有备注型字段，那么这个表就有备注文件，数据都在备注文件中。具体数据输入方法为：双击memo，进入备注型字段值输入编辑窗口，这时可以输入相应值，输入完毕直接点击关闭按钮或用组合键Ctrl+PgDn或用组合键Ctrl+W,都可以再返回到表记录输入的浏览或编辑窗口。
    vfp编程高手请进!答：如果是二进制格式可直接用低级文件函数打开，读取文件。FOPEN(cFileName [, nAttribute])FSEEK(nFileHandle, nBytesMoved [, nRelativePosition])FREAD(nFileHandle, nBytes)不过FREAD(nFileHandle, nBytes)读出的是一字串，你要用ASC（）转换成数值。
    vfp的题,有高手帮帮忙答：,gen(a,b)set talk on return proc gen para a,b x=-b/a return x 5.编写程序：根据程序中输入的半径值求出相应的圆面积。要求使用调用过程的方式实现 主程序.prg clear set talk off s=0 input "r=" to r do sub with r,s ?"圆面积为:",s set talk on return proc sub ...
    求VFP编程高手解释程序 输出3-100之间的所有素数答：set talk off clear for m=3 to 100 step2 &&在3到100之间的所有奇数中找素数，因为偶数一定不是素数。n=int(sqrt(m)) &&这是一个数学知识点，把一个数m分解为两个约数的乘积，总有一个约数一定是小于等于根号m的。所以只需要判断在2到根号m中这个数有没有约数就可以了。也可以改为 ...
    急求:关于VFP编程的几个问题?请高手赐教,先谢谢了答：set fdow to 用于指定一周的第一天，set fdow to 1 指定周日为一周的第一天 set fweek 指定一年的第一周要满足的条件 set fweek to 1 (默认) 第一周要包含一月一日
    VFP的题目!!跪求高手!!!答：b=0 do whil b<=9 s=0 do whil s<=9 g=0 do whil g<=9 if (k^3+b^3+s^3+g^3)=168.and.mod(k*1000+b*100+s*10+g,2)>0 gs=gs+1 ?"满足要求的第"+allt(str(gs))+"个数为：",k*1000+b*100+s*10+g endi g=g+1 endd s=s+1 endd b=b+1 endd k=k+...
    求助各位高手一道VFP的编程题答：input "输入第"+str(i,2)+"个数：" to a(i)endfor 排序 for i=1 to 9 for j=1 to 10-i if a(j)>a(j+1)t=a(j)a(j)=a(j+1)a(j+1)=t endif endfor endfor input "输入插入的数：" to n 查找大于n的第一个数 for i=1 to 10 if a(i)>=n exit endif endfor...
    vfp编程题求助答：1、clear input "请输入a边：" to a input "请输入b边：" to b input "请输入c边：" to c if a+b>c and b+c>a and a+c>b s=(a+b+c)/2 mj=sqrt(s*(s-a)*(s-b)*(s-c))?"三角形的面积是：",mj else ?"三个数不能组成三角形"endif 2、clear input "请输入年份...
    大家正在搜
    编程可以帮助我们解决什么问题编程对于孩子帮助请问编程对学生有什么帮助编程对升学的帮助编程对数学有帮助嘛编程高手怎么成为编程高手编程高手是怎么炼成的我国编程高手是谁