Если число четное, то уменьшите его в 2 раза, иначе увеличьте в 3 раза - QBasic
Формулировка задачи:
Дано натуральное число.если оно четное то уменьшите его в 2 раза,иначе увеличьте в 3 раза
Решение задачи: «Если число четное, то уменьшите его в 2 раза, иначе увеличьте в 3 раза»
textual
Листинг программы
CLS INPUT "N = "; N IF N MOD 2 = 0 THEN N = N / 2 ELSE N = 3 * N PRINT N END
Объяснение кода листинга программы
N
- это переменная, которая содержит введенное пользователем числоN MOD 2 = 0
- проверка, является ли число четнымN = N / 2
- если число четное, то оно уменьшается в 2 разаN = 3 * N
- если число нечетное, то оно увеличивается в 3 разаPRINT N
- выводится полученное числоEND
- завершение программы
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д