Visual Foxpro 6.0 编程..三个题目..哪位大学亲来给个答案??好的话有追加..一定不能有错的..虽然我看不出繽百度知道

1.编程，由键盘输出一个数,求从1加到这个数的和。
2.编程,输入一个成绩,按其成绩归类到A,B,C,D,E等五个等级之一,并输出所属级别。
E:0~60(不含60)
D:60~70（不含70)
C:70~80（不含80)
B:80~90（不含90)
A:90~100
若输入成绩不在此范围内,输入提示信息"您输入的成绩有误!"。


3.利用循环结构,给一个两行三列的数组赋值,每个元素的值为该元素行列相乘的积。


三题都做出来了追加50.。高手快来啊。。

追问：- =我怎么觉得我看的老师做的没有用过下划线昂？
 n_sum
这是什么意思昂?
&&& 还有这个感觉也没见过..
ii还有这个..
问题有点多..主要是完全没听过..亚历山大..

答案：第一题：
SET TALK OFF 
CLEAR 
LOCAL n , n_sum
input "请输入一个自然数：" to  n
n_sum	=0
FOR ii = 1 TO n
	n_sum	=n_sum + ii
ENDFOR 
?"从 1 到 "+LTRIM(str(n))+" 的和是："+LTRIM(STR(n_sum))
第二题：
SET TALK OFF 
CLEAR 
LOCAL n , n_sum
input "请输入一个成绩数：" to  n
DO CASE 
	CASE n<60 AND n>0
		?"级别：E"
	CASE n>=60 AND n<70 
		?"级别：D"
	CASE n>=70 AND n<80 
		?"级别：C"
	CASE n>=80 AND n<90 
		?"级别：B"
	CASE n>=90 AND n<=100
		?"级别：A"
	OTHERWISE 
		?"您输入的成绩有误!"
ENDCASE 
第三题：
SET TALK OFF 
CLEAR 
LOCAL  r , c 
r	=2   &&& 行数
c	=3   &&& 列数
LOCAL  n_array(r,c)
FOR ii = 1 TO r
	FOR jj = 1 TO c 
		n_array(ii,jj)=jj*ii
	ENDFOR 
ENDFOR 
DISPLAY MEMORY LIKE n_a*

上一个：visual foxpro 9.0简体中文版适合于win7吗
下一个：visual foxpro中不能设置数据源的控件有哪些?