主题：求救！！1到100之间奇数的和这个程式怎么写下啊
夢遊旭
[专家分：0] 发布于 2006-06-10 12:08:00
1到100之间奇数的和！！！偶数呢
回复列表 （共42个回复）
31 楼
小精灵LS [专家分：580] 发布于 2007-04-01 16:49:00
cls
for i=1 to 100
if i mod 2<>0 then s=s+i
next i
print s
end
32 楼
游戏之王 [专家分：540] 发布于 2007-04-04 16:46:00
还是看我编的程序吧！
奇数：
CLS
FOR I=1 TO 99 STEP 2:S=S+I:NEXT I
PRINT “1到100之间奇数的和”；S
END
偶数：
CLS
FOR I=2 TO 100 STEP 2:S=S+I:NEXT I
PRINT "1到100之间奇数的和";S
END
33 楼
V2战警2 [专家分：390] 发布于 2007-07-29 16:43:00
奇数：
for i=1to 99 step 2
s=s+i
next i
print s
end
偶数：
for i=2to 100 step 2
s=s+i
next i
end
34 楼
yaoyusheng [专家分：460] 发布于 2007-07-29 18:46:00
奇数:
sum=0
for i=1 to 100
if i mod 2 <>0 then sum=sum+i
next i
end
偶数:
sum=0
for i=1 to 100
if i mod 2 =0 then sum=sum+i
next i
end
给我加分呀
35 楼
小精灵1号 [专家分：1040] 发布于 2007-08-08 09:58:00
cls
for i=1 to 100
if i mod 2<>0 then j=s+i:goto 10
o=o+i
next i
print j,o
end
36 楼
我的电脑 [专家分：990] 发布于 2007-08-09 10:58:00
"JSH"的意思就是分别取奇数和拼音的首字母,下一个也同样.
37 楼
我的电脑 [专家分：990] 发布于 2007-08-09 11:01:00
C语言较难,所以最好先学QB.
38 楼
我的电脑 [专家分：990] 发布于 2007-08-09 11:04:00
CLS
FOR I=1 TO 100 STEP 2:J=J+I:NEXT I
FOR I=2 TO 100 STEP 2:O=O+I:NEXT I
PRINT "JSH=";J
PRINT "OSH=";O
END
加分!!!!!!!!!!
39 楼
shenjiayu [专家分：20] 发布于 2007-08-11 19:49:00
'求n以内(必要时包括)的奇数和或偶数和
cls
input n
input a
'这里,如果a是偶数输入2,奇数输入1
i=a
s=0
do
s=s+i
i=i+2
loop until i>n
print s
end
40 楼
天尝地酒 [专家分：870] 发布于 2007-08-14 08:07:00
cls
for i=1 to 99 step 2
s=s+i
next i
for i=2 to 100 step 2
d=d+i
next i
print "1到100之间的奇数和";s
print "1到100之间的偶数和";d
end
我来回复
您所在位置：