摘要: function newnode(x:longint):longint; begin inc(cnt);dis[cnt]:=x;exit(cnt); end; procedure add(id:longint); var ch,i:char;p,np,q,nq,j:longint; begin ch:=s[id];np:=newnode(id);p:=last;last:=np; ... 阅读全文
posted @ 2017-03-09 14:54 OldJang 阅读(284) 评论(1) 推荐(0) 编辑