Каждое из заданных натуральных чисел заменить числом, получающимся при записи его десятичных цифр в обратном порядке — QBasic(Бейсик)

INPUT "vvedite kol-vo chisel ", n
FOR i = 1 TO n
    INPUT "vvedite chislo ", a&
    b& = 0
    DO
        b& = b& * 10 + a& MOD 10
        a& = a& \ 10
    LOOP UNTIL a& = 0
    PRINT b&
NEXT