10 INPUT X$,Y$ 15 IF X$="" OR Y$="" THEN PRINT "ξΕΤ":GOTO 10 20 FOR I=1 TO LEN(Y$):FOR J=1 TO LEN(X$) 30 IF MID$(Y$,I,1)=MID$(X$,J,1) THEN X$=LEFT$(X$,J-1)+RIGHT$(X$,LEN(X$)-J):A$="δΑ":NEXT I ELSE A$="ξΕΤ":NEXT J 50 PRINT A$:END