В трехзначном числе x зачеркнули его вторую цифру. Когда к образованному
при этом двузначному числу справа приписали вторую цифру числа x, то по-
лучилось число 456. Найти число x.
в QB если можно

Пусть первоначально число имело вид abc, После зачеркивания второй цифры оно превратилось в ac, а когда зачеркнутую b приписали справа, получилось acb=456, откуда понятно, что фактически поменяли местами цифры b и c. Поэтому программа должна получить число (456) и поменять в нем последнюю цифру с соседней, получив 465.MS DOS QBasic 1.0DIM r AS INTEGERCLSINPUT rb = r MOD 10a = INT(r / 100)c = INT(r / 10) MOD 10r = 100 * a + 10 * b + cPRINT "x="; r