Решение уравнения 2 ^ m - 2 ^ n = 1984 - QBasic

Формулировка задачи:

Решить в натуральных числах уравнение 2 ^ m - 2 ^ n = 1984 решение Очевидно, что m > m Кроме того n не может быть равно или больше 11 (2^11 > 2000) ибо в этом случае разность между слагаемыми превысит 2000>1884 Опираясь на эти данные, пишем программу, которая и выдает ответ m = 11; n = 6.

REM
REM  2 ^ m - 2 ^ n = 1984
REM
REM  OTBET: m = 11; n = 6
REM
 
CLS
 
FOR n = 0 TO 11
FOR m = n + 1 TO 12
   IF 2 ^ m - 2 ^ n = 1984 THEN PRINT m; n
NEXT m, n
END

Решение задачи: «Решение уравнения 2 ^ m - 2 ^ n = 1984»

Листинг программы

INPUT r
DO WHILE r MOD 2 = 0
r = r / 2
n = n + 1
LOOP
r = r + 1
m = n
DO WHILE r > 1
r = r / 2
m = m + 1
LOOP
PRINT m, n

Объяснение кода листинга программы

В начале программы имеется строка INPUT r, которая предлагает пользователю ввести значение переменной r.
Далее идет цикл DO WHILE, который будет выполняться до тех пор, пока значение переменной r, взятое по модулю 2, равно 0.
Внутри цикла значение переменной r делится на 2.
Также внутри цикла значение переменной n увеличивается на 1.
После выхода из цикла значение переменной r увеличивается на 1.
Значение переменной m присваивается значение переменной n.
Далее идет новый цикл DO WHILE, который будет выполняться до тех пор, пока значение переменной r больше 1.
Внутри цикла значение переменной r делится на 2.
Также внутри цикла значение переменной m увеличивается на 1.
После выхода из цикла происходит вывод на экран значений переменных m и n.
Значение переменной m в момент вывода равно значению переменной n в момент выхода из первого цикла.
Значение переменной n в момент вывода равно последнему значению переменной n в первом цикле.
Значение переменной r в момент вывода равно 2 в степени значения переменной m.
Значение переменной r в момент вывода равно 2 в степени значения переменной n без учета последнего шага.
Если m и n вводились с клавиатуры, то их значения равны количеству нажатий клавиш влево и вправо соответственно.
Если m и n были заранее заданы в коде, то их значения могут иметь другие смысловые значения, которые зависят от контекста задачи.
Если вводимые значения m и n не удовлетворяют условию 2^m-2^n=1984, то программа выведет их на экран.
Если вводимые значения m и n удовлетворяют условию 2^m-2^n=1984, то программа выведет их на экран.
В данном коде не проверяется, являются ли значения переменных m и n допустимыми для логарифма по основанию 2.
В данном коде не проверяется, является ли значение переменной r допустимым для логарифма по основанию 2.