两个已排序的单链表，AB求一个C=AUB，D=AnB 而不改变其排序性打印出C，D
中国DOS联盟
联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！
中国DOS联盟论坛 » DOS开发编程 & 发展交流 （开发室） » 请教一个C语言程序问题，急!!!
查看 1,257 回复 1
楼 主
请教一个C语言程序问题，急!!!
发表于 2002-12-11 00:00 · 中国 江苏 常州 电信
第 2 楼
发表于 2002-12-11 00:00 · 中国 江苏 常州 电信
用BASIC语言实现该程序中的一部份，供大家参考! 这个程序实在要得太急，我对C不大懂，没办法!请大家帮帮忙，谢了!
INPUT "input dimensions m,n"; m, n
DIM a(m), b(n), c(m * n)
FOR i = 1 TO m
INPUT "input set a"; a(i)
NEXT i
FOR i = 1 TO n
INPUT "input set b"; b(i)
NEXT i
k = 0
FOR i = 1 TO m
LET c(i) = a(i)
NEXT i
FOR i = 1 TO n
FOR j = 1 TO m
IF b(i) = a(j) THEN GOTO h1:
NEXT j
k = k + 1
c(m + k) = b(i)
h1:
NEXT i
h2:
NEXT i
PRINT
INPUT "more input 1(yes) or 0(no)"; x
h3:
IF x = 1 THEN GOTO h3:
END
INPUT "input dimensions m,n"; m, n
DIM a(m), b(n), c(m * n)
FOR i = 1 TO m
INPUT "input set a"; a(i)
NEXT i
FOR i = 1 TO n
INPUT "input set b"; b(i)
NEXT i
k = 0
FOR i = 1 TO m
LET c(i) = a(i)
NEXT i
FOR i = 1 TO n
FOR j = 1 TO m
IF b(i) = a(j) THEN GOTO h1:
NEXT j
k = k + 1
c(m + k) = b(i)
h1:
NEXT i
h2:
NEXT i
INPUT "more input 1(yes) or 0(no)"; x
h3:
IF x = 1 THEN GOTO h3:
END
论坛跳转: