Прлверить , является ли трехзначное число нечетным в программке бейсик

Прлверить , является ли трехзначное число нечетным в программке бейсик

Задать свой вопрос
1 ответ
Dim n As Integer
n = InputBox("Введите число")
If n And 1 Then
MsgBox ("Число нечетное")
Else
MsgBox ("Число четное")
End If
Юрий Купров
это для Visual Basic и VBA
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт