dim A$(26)
DATA a$, b$.... Z$ (офк у меня целиком тут написано)
PRINT "введите первую букву"
INPUT "C"; C$
FOR i = 1 to 26
IF C$=A$(i) THEN D = i
NEXT i
PRINT "введите первую букву"
INPUT "E"; E$
FOR i= 1 to 26
IF E$=A$(i) THEN F= i
NEXT i
IF D<F THEN PRINT C$, E$ ELSE PRINT E$, C$
END