a2:= int part((C-a 1 * 100)/10);
a3:= int part(C-a 1 * 100-A2 * 10);
a4:= int part((C-a 1 * 100-A2 * 10-A3)* 10);
a5:= C * 100-a 1 * 10000-A2 * 1000-A3 * 100-A4 * 10;
X:A1=A2或A1=A3或A1=A4或A1=A5或A2=A3或A2=A4或A2=A5或A3=A4或A3=A5或A4 = A5