Если число четное, то уменьшите его в 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

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

  1. N - это переменная, которая содержит введенное пользователем число
  2. N MOD 2 = 0 - проверка, является ли число четным
  3. N = N / 2 - если число четное, то оно уменьшается в 2 раза
  4. N = 3 * N - если число нечетное, то оно увеличивается в 3 раза
  5. PRINT N - выводится полученное число
  6. END - завершение программы

Оцени полезность:

11   голосов , оценка 4.091 из 5
Похожие ответы