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

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

Leave a Comment