Расчет количества нечетных чисел в заданном интервале значений - VBA
Формулировка задачи:
Ввод интервала осуществляется пользователем, через клавиатуру.
Заранее спасибо!
Решение задачи: «Расчет количества нечетных чисел в заданном интервале значений»
textual
Листинг программы
Sub Количество_нечетных() A = Val(InputBox("A= ")): B = Val(InputBox("B= ")) MsgBox (B - (B + 1) Mod 2 - (A + (A + 1) Mod 2)) / 2 + 1 End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д