数据结构考研分类复习真题 第二章 线性表[17]

．在本题的程序中函数过程Create_link_list(n)建立一个具有n个结点的环形链表;程序过程 josephus(nim)对由Create_link_list(n)所建立的具有n个结点的环形链表按一定的次序逐个输出并删除链表中的所有结点参数 n(n>)指明环形链表的结点个数参数 i(<=i<=n)指明起始结点参数 m (m>)是步长指明从起始结点或前次被删除并输出的结点之后的第m个结点作为本次被输出并删除的结点例如对于下图中具有个结点的环形链表在调用 josephus()后将输出 请在横线处填上适当内容每空只填一个语句

TYPE nodeptr=^nodetype;

nodetype=RECORD

data: intrger; link: nodeptr

END;

VAR nim: integer;

FUNCTION Create_link_list(n: integer): nodeptr;

VAR headpq: nodeptr; i:integer;

BEGIN head := NIL;

IF n> THEN

BEGIN new(head); p: =head;

FOR i:= TO n DO

BEGIN p^data:=i; new(q); (A) ; (B) END

p^data:=n; (C) ;

END;

Creat_link_list:=head

END;

PROCEDURE josephus(nim:integer);

VAR pq:nodeptr; j:integer;

BEGIN p:=Creat_link_list(n);

WHILE i> DO BEGIN p:=p^link; i:=i END;

(D) ;

WHILE j<n DO

BEGIN

FOR i:= TO m DO p:=p^link;

(E) ; write(q^data:); (F) ;

dispose(q); j:=j+

END

END;【复旦大学 四（分）】

[] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []