Задачи по теме "Оператор выбора" (Часть 2) - QBasic

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

Здравствуйте, это продолжение моей предыдущей темы: Задачи по теме "Оператор выбора" (Часть 1). Помогите пожалуйста решить задачу схожей по типу с предыдущей. Задача. Дано натуральное число N. Если оно делится на 4, вывести на экран ответ N = 4k (где k — соответствующее частное); если остаток от деления на 4 равен 1 — N = Ak + 1; если остаток от деления на 4 равен 2 — N = 4k + 2; если остаток от деления на 4 равен 3 – N = 4k + 3. Например, 12 = 4 • 3, 22 = 4 • 5 + 2.

Решение задачи: «Задачи по теме "Оператор выбора" (Часть 2)»

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

CLS
INPUT "N = "; n
m = n MOD 4
PRINT
k = n \ 4
 
SELECT CASE m
   CASE 1
       PRINT "N = "; "4 *"; k; "+ 1"
   CASE 2
       PRINT "N = "; "4 *"; k; "+ 2"
   CASE 3
       PRINT "N = "; "4 *"; k; "+ 3"
   CASE ELSE
       PRINT "N = "; "4 *"; k
END SELECT
END

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

Объявлены две переменные: n и k.
Значение переменной n получается с помощью функции INPUT, которая выводит сообщение N = и ожидает ввода значения.
Переменная m получает остаток от деления n на 4 с помощью оператора MOD.
Переменная k получает целую часть от деления n на 4 с помощью оператора .
Выполняется оператор SELECT CASE, который проверяет значение переменной m.
В случае, если m равно 1, выводится сообщение N = 4 * k + 1.
В случае, если m равно 2, выводится сообщение N = 4 * k + 2.
В случае, если m равно 3, выводится сообщение N = 4 * k + 3.
В случае, если m не равно 1, 2 или 3, выводится сообщение N = 4 * k.