VBNet - Форум - Как проверять числа на чётность?

Вопрос: Как проверять числа на чётность? Добавлено: 23.10.03 14:36

Автор вопроса: Raven | ICQ: 174882249

Как проверять числа на чётность?
Ответить

Ответы Всего ответов: 8

Номер ответа: 1 Автор ответа: crackoff ICQ: 156165990 Вопросов: 12 Ответов: 229	Профиль \| \| #1	Добавлено: 23.10.03 14:44
	dim x as integer x=inputbox("Введите число") if x mod 2 then messagebox "Число нечетное" else messagebox "Число четное" end if Ответить

Номер ответа: 2
Автор ответа:

boevik

Хранитель чата

ICQ: 137392264

Вопросов: 8
Ответов: 557

Web-сайт: www.hypertech.ru
Профиль | | #2

Добавлено: 23.10.03 14:45

1) Num Mod 2 = 0, число четное

2) Num AND 1 = 0, число четное

Номер ответа: 3 Автор ответа: Pashenko ICQ: 176176951 Вопросов: 14 Ответов: 655	Профиль \| \| #3	Добавлено: 23.10.03 14:46
	If i Mod 2 = 0 Then MsgBox "Чётное" Else MsgBox "Нечётное" Ответить

Номер ответа: 4
Автор ответа:

Morpheus

Вопросов: 224
Ответов: 3777

Web-сайт: xury.zx6.ru
Профиль | | #4

Добавлено: 25.10.03 04:53

А можно IsInteger юзать?

Номер ответа: 5
Автор ответа:

shuffle

Администратор

ICQ: 201502381

Вопросов: 15
Ответов: 737

Добавлено: 25.10.03 06:06

To Morpheus:

И как ты собираешься юзать IsInteger?

Номер ответа: 6 Автор ответа: Maxik Вопросов: 58 Ответов: 201	Профиль \| \| #6	Добавлено: 25.10.03 06:53
	Но, наверно, имел в виде ЦЕЛЫЕ числа. Тогда надо юзать Int или Fix. Ответить

Номер ответа: 7 Автор ответа: Last_Santa ICQ: 200700724 Вопросов: 38 Ответов: 329	Web-сайт: localhost Профиль \| \| #7	Добавлено: 25.10.03 06:59
	судя по всему делением на два Ответить

Номер ответа: 8 Автор ответа: Илья ICQ: 251647191 Вопросов: 37 Ответов: 167	Web-сайт: www.lirc.narod.ru Профиль \| \| #8	Добавлено: 25.10.03 13:23
	IF n/2=int (n/2) then число четное Ответить

Страница: 1 |