主题：年龄
TMGY119
[专家分：0] 发布于 2007-09-11 15:36:00
2猜年龄：某校的信息技术贾老师，大家不知道他的真实年龄，只知道他的年龄在20和60之间，现在让你去猜。
下面是某位同学设计的猜年龄的VB程序， 其设计思想为：如果你猜的数a比年龄x小，电脑提示“太小了”， 如果你猜的数a比年龄x大，电脑提示“太大了”。假如你猜对了，电脑提示“恭喜你，猜对了！”。如果猜得不对，那么需要重新猜，直到猜中为止。为了实现这一目标，完善下面的VB程序，在划线处填入合适的语句或表达式，完成程序设计。
回复列表 （共7个回复）
沙发
Matodied [专家分：7560] 发布于 2007-09-11 21:23:00
这不是VB！还有你的程序在哪儿？
板凳
老大徒伤悲 [专家分：29120] 发布于 2007-09-12 19:05:00
下面是人来猜的程序。机器猜的程序就简单了，用对折法或0.618法都行。
n=9
？"请输入你猜测的年龄（20~60）"；
input a
do
if x=a then
? "你在第" ;10-n;"次猜对了，真实年龄为";x
exit do
else
if x>a then
?"你猜的太小了！"
else
?"你猜的太大了！"
endif
if n=0 then
? "你猜了10次都错了！嘿嘿，不再给你机会了。"
exit do
endif
？"请重新猜测年龄（20~60）"
input a
n=n-1
endif
loop
3 楼
TMGY119 [专家分：0] 发布于 2007-09-13 10:25:00
有QQ号可以交流吗??太感谢了.
4 楼
老大徒伤悲 [专家分：29120] 发布于 2007-09-13 20:08:00
没有
5 楼
workhow [专家分：810] 发布于 2007-09-13 20:27:00
8282798这是我们的VB群号.关注TMGY119的出题目.
6 楼
小精灵1号 [专家分：1040] 发布于 2007-09-21 17:15:00
CLS
X=INT(RND*41)+20
DO
INPUT N
IF A=X THEN PRINT "YSE":END
IF A>X THEN PRINT "DA"
IF A<X THEN PRINT "XIAO"
LOOP
END
7 楼
网虫一号 [专家分：1230] 发布于 2007-09-21 17:18:00
CLS
x = INT(RND * 41 + 20)
DO
INPUT n
IF x = n THEN PRINT "恭喜你，猜对了!": END
IF n < x THEN PRINT "太小了" ELSE PRINT "太大了"
LOOP
END
我来回复
您所在位置：