哇 替楼主感谢你 行走在天空同学！！！

明天再重新做啦···刚才搞的头都晕了！ 结果还做错

引用:

原帖由 行走在天空 于 2008-5-22 21:47 发表
刚才貌似发错啦！

？ 不怕不怕 更正后麻烦再发一次，呵呵

好啊 没关系 实在太谢谢了

没注意这边

谢谢 ：P

clear
FOR J=1 TO 8
i=str(j,2)
input "请第&i.位评委打分：" to C
store c to N1,N2,n3
for J=2 TO 8
i=str(j,2)
input "请第&i.位评委打分：" to C
IF C<N1
  N1=C
ENDIF
IF c>n2
N2=C
ENDIF
n3=n3+c
endfor
ENDFOR
?"N1=",N1, "N2=",N2,"n3=",(n3-n1-n2)/6
好像有点过于繁复，但没办法，水平不够啊！

谁帮我做一道FOXPRO的题
感谢了

唔知系乜，睇唔明，路过

设学生表增加了奖学金字段，下列程序显示学生表中每个系的男女同学的奖学金总额，请补充为完成的部分，并给出程序运行的结果

clear
use 学生
index on 系别 to inxi
?"系别  男同学奖学金总额  女同学奖学金总额“
do while not eof( )
  xb=系别
store 0 to JJ1,JJ2
  do while ________
    if 性别=“男”
  _________
    else
    ___________
    endif
  _________
  enddo
  ?alltrim(XB)+"系"+str(JJ1,19,2)+str(JJ2,19,2)
enddo
use

横线为填的部分
麻烦了

几年没接触VFP了。。下面是我猜想的，仅供参考。。。
第一空：系别=xb
第二空：JJ1=JJ1+奖学金
第三空：JJ2=JJ2+奖学金
第四空：skip
运行结果：（假设的，因为我不知道表“学生”的内容）
系别    男同学奖学金总额     女同学奖学金总额
电子系     20000                      18800
……       ……                      ……
外语系     16500                       23000
中文系     15800                       21500
（系的排序的一般按英文字母顺序）

突然感觉后院牛人多

谢谢师兄