求助 用 VF 计算1到100之间所有偶数的和

我看到了一个语句,类似这样,我不懂VF 但想知道每一句是什么意思?这个请问应该怎么改才能实现这样的效果呢?类似这样的应该按什么思路编呢?
SET TALK OFF
N=2
S=0
DO WHILE N<100
S=S=N
N=N+2
ENDDO
?"1到100之间的偶数和为'',S
SET TALK ON
我也知道这个是用判断问题的语句,我不想用IF实现,想用DO WHILE .....ENDDO 去做!如果我上面写的那个命令能实现吗?好像最后一句错了,我想知道应该怎么改?

SET TALK OFF **关掉人机对话,就是屏幕不显示运行结果
N=2 **赋值语句
S=0 **赋值语句
DO WHILE N<100 **限制条件为N<100 的循环
S=S=N **应为s=s+n s是合计累加数,n是下一个偶数
N=N+2
ENDDO **循环结束
?"1到100之间的偶数和为",S **显示结果
SET TALK ON **打开人机对话,就是屏幕可以显示运行过程产生的结果

DO WHILE N<100 改为DO WHILE N<101 不然会差100
S=S=N 改为 S=S+N

注意标点符号都是英文字符,不是汉语字符
温馨提示:内容为网友见解,仅供参考
第1个回答  2007-06-08
b=0 &&设定求和变量
for i=1 to 100 &&从1到100
if mod(i,2)=0 &&判定是为偶数,如改为1时判定是奇数
b=b+i &&累加偶数
endif
endfor

? b &&显示结果

结果是2550
第2个回答  2020-03-18
SET
TALK
OFF
**关掉人机对话,就是屏幕不显示运行结果
N=2
**赋值语句
S=0
**赋值语句
DO
WHILE
N<100
**限制条件为N<100
的循环
S=S=N
**应为s=s+n
s是合计累加数,n是下一个偶数
N=N+2
ENDDO
**循环结束
?"1到100之间的偶数和为",S
**显示结果
SET
TALK
ON
**打开人机对话,就是屏幕可以显示运行过程产生的结果
DO
WHILE
N<100
改为DO
WHILE
N<101
不然会差100
S=S=N
改为
S=S+N
注意标点符号都是英文字符,不是汉语字符

求助 用 VF 计算1到100之间所有偶数的和
DO WHILE N<100 **限制条件为N<100 的循环 S=S=N **应为s=s+n s是合计累加数,n是下一个偶数 N=N+2 ENDDO **循环结束 ?"1到100之间的偶数和为",S **显示结果 SET TALK ON **打开人机对话,就是屏幕可以显示运行过程产生的结果 DO WHILE N<100 改为DO WHILE N<101...

求VF程序设计教程1-100之间的全部偶数之和的设计程序,要详细步骤。_百 ...
include <stdio.h> main(){ int i,s=0;for(i=0;i<=100;i=i+2)s=s+i;printf("0~100之间全部偶数之和为:%d",s);}

用vf编程求1~100中奇数之和。 编程求1~100中偶数之和。
stor 0 to x1,x2 do while n<=100 if n%2<>0 x1=x1+n else x2=x2+n endif n=n+1 enddo ?"奇数和为:",x1 ?"偶数和为:",x2

vf输入1-100内的所有奇数和、偶数和、质数和程序?
print("1-100内所有质数的和为:", prime_sum)第一个for循环求1-100内的所有奇数和,步长为2,从1开始遍历到101,每次将奇数累加到odd_sum变量中。第二个for循环求1-100内的所有偶数和,步长为2,从2开始遍历到101,每次将偶数累加到even_sum变量中。第三个for循环求1-100内的所有质数和,从...

如何在VF中用do while编程计算1~100所有偶数之和
代码如下:clear n=1 s=0 do while n<=100 if mod(n,2)=0 then s=s+n endif n=n+1 enddo ? "1--100所有的偶数和="+alltrim(str(s))return

在VF中用do while 循环计算1~100之间所有偶数的和
s=0 n=1 do while n<=100 if mod(n,2)=0 s=s+n endif n=n+1 enddo ?'结果是:',s

用VF程序求出1到100的自然数的奇偶数的和
第一种:set talk on clear s1=0 s2=0 for i =1 to 100 step 2 s1=s1+i endfor for j=2 to 100 step 2 s2=s2+j endfor ?"所有奇数和为:",s1 ?"所有偶数和为:",s2 SET TALK off 第二种:set talk on clear s1=0 s2=0 FOR i =1 TO 100 IF mod(i,2)<>0 s1=s1...

...计算s=1+2+3+ +100,并求出1-100之间偶数的和 该怎么写?感谢_百度...
s=0 k=0 for i=1 to 100 s=s+i if i%2=0 k=k+i endif endfor ?"s=1+2+3+ +100=",s ?"1-100的偶数和:",k

用vf语句求1到100之间偶数的和
Clear s = 0 For i = 1 To 100 If i % 2 == 0 s = s + i Endif Next ? s 为什么不对?哪里不对 ?

1--100的偶数之和,用VF编写程序
程序:X=0 FOR N=0 TO 100 STEP 2 X=X+N ENDFOR ?X 结果:2550

相似回答