当前位置:编程学习 > Foxpro >>

1+2+3+4+5+6+......100Visual FoxPro用for endfor语句编程

追问:能不能告诉我整体的程序吗 我有很多都不懂能说说为什么这么做吗能说说为什么这么做吗
答案:i=1
j=0
for i= 1 to 100
     j=j+i
next
其他:clear
s=0
for i=1 to 100
  s=s+i
endfor
?"1+2+3+4+5+6+......100=",s SET TALK OFF
CLEAR
S=0
M=0
FOR J=1 TO 100
      S=S+J
ENDFOR
 @ 10,10 SAY "1到100之和为:"+LTRIM(STR(S))
RETURN 注解一下   syht2000  朋友的程序:

SET TALK OFF 
CLEAR
S=0       &&   设置S初值
M=0      &&   设置S初值  **此变量可省**
FOR J=1 TO 100    &&   循环开始    j从1开始,每次加1,直到100
      S=S+J     &&   循环体, 第一次循环 0+1 赋值给S,S的值为1,第二次循环  1+2再 赋值给S,S的值为3  。
ENDFOR      &&   循环结束
 @ 10,10 SAY "1到100之和为:"+LTRIM(STR(S))    &&在屏幕的 第10行,每10列显示  1到100之和为:5050 (LTRIM(STR(S))  将S转化为字符并删除前导空格)
RETURN      && 返回调用处



这样说明能理解吗? 

上一个:visual foxpro程序里输入 ?vartype(计算机) 输出U是为什么? 为什么不输出C?
下一个:关于Visual foxpro程序设计

CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,