.() ()next[k]
.()i=i+ ()j:=j+ ()i:=ij+ ()j:=; ()imt(或i:=ij+) ()
程序中递归调用
()ch<>midch //当读入不是分隔符&和输入结束符$时继续读入字符
()ch=ch //读入分隔符&后判ch是否等于ch得出真假结论
()answer=true
()answer=false
()read(ch)
()ch=endch
[] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] []