中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-10-31 14:55
共 47,815 主题排行 / 349,930 发帖 / 今日 0 篇 / 48,290 会员排行
DOS开发编程 & 发展交流 (开发室) » 看看这段代码吧!
可打印版本  889 / 3
第1楼 borlinpac 发表于 2004-05-16 00:00
初级用户 发帖 5 积分 119
看看这段代码吧!
看了之后你肯定会对GOTO有害有深刻的认识:
八皇后问题(QBASIC版)10 I = 1
20 A(I) = 1
30 G = 1
40 FOR K = I - 1 TO 1 STEP -1
50 IF A(I) = A(K) THEN 70
60 IF ABS(A(I) - A(K)) I - K THEN 90
70 G = 0
80 GOTO 100
90 NEXT K
100 IF I 8 THEN 180
110 IF G = 0 THEN 180
120 FOR L = 1 TO 8
130 PRINT USING "##"; A(L);
140 NEXT L
150 PRINT "*";
160 M = M + 1
170 IF M MOD 3 = 0 THEN PRINT
180 IF G = 0 THEN 230
190 IF I = 8 THEN 230
200 I = I + 1
210 A(I) = 1
220 GOTO 30
230 IF A(I) < 8 THEN 270
240 I = I - 1
250 IF I = 0 THEN 290
260 GOTO 230
270 A(I) = A(I) + 1
280 GOTO 30
290 PRINT
300 PRINT "SUM="; USING "##"; M;
310 PRINT
320 END






第2楼 六月飞雪 发表于 2004-05-25 00:00
高级用户 发帖 201 积分 893
好象没什么认识!因为我对这个一点都不懂,能不能说点基本的,从头开始学的
第3楼 qinqong 发表于 2004-06-03 00:00
高级用户 发帖 148 积分 599
在刚做的C语言数据结构上机试验题中我用了好几个Goto,汗。。。。。
第4楼 救世猪 发表于 2004-06-03 00:00
初级用户 发帖 13 积分 121
goto并不是洪水猛兽,没必要害怕它。当年c语言的开发者们就是否在c语言里保留goto进行过大辩论,结果是goto被保留了下来,可见,goto还是有用的,但从结构化编程的角度出发,轻易不要使用它。
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023