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

Янеж2005 Янеж2005    1   05.08.2019 07:00    2

Ответы
ninja2005xxx ninja2005xxx  03.10.2020 23:07
Dim n As Integer
n = InputBox("Введите число")
If n And 1 Then
MsgBox ("Число нечетное")
Else
MsgBox ("Число четное")
End If
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика