?clear
clc
t=0;
n=input（‘需檢驗編碼的個數：‘）;
for?i=1:n
????A{1i}=input（‘輸入待驗證的編碼:‘‘s‘）;
end
for?i=1:n
????s（i）=length（A{1i}）;
end
for?i=1:n
????for?j=（i+1）:n
????????if?strcmp（A（i）A（j））
???????????disp（‘奇異‘）;
???????????return;
????????end
????end
end
for?i=1:n
????s（i）=length（A{1i}）;
end
d=0;
for?i=1:n
????d=d+2^（-s（i））;
end
if?d>1
????disp（‘非唯一可譯碼1‘）
????return;
end
R{11}=0;
for?i=1:n;
????for?j=i+1:n
????????if?length（A{1i}）<=length（A{1j}）
????????????if?strncmp（A{1i}A{1j}length（A{1i}））==1
???????????????t=1+t;
????????????????R{1t}=A{1j}（（length（A{1i}）+1）:length（A{1j}））;
????????????end
????????elseif?length（A{1i}）>length（A{1j}）
???????????????if?strncmp（A{1i}A{1j}length（A{1j}））==1
???????????????????t=1+t;
????????????????R{1t}=A{1i}（（length（A{1j}）+1）:length（A{1i}））;
???????????????end
????????end
????end
end
if?R{11}==0
????