Определить четность двух чисел - VB

Узнай цену своей работы

Формулировка задачи:

Заданы два целых числа. Определить, являются ли они оба четными или оба нечетными, или определить, какое из них четное, а какое нечетное. Помогите плизз, очень надо.

Решение задачи: «Определить четность двух чисел»

textual
Листинг программы
Private Sub Command1_Click()
a = Val(Text1.Text): b = Val(Text2.Text): c = Val(Text3.Text)
MsgBox IIf(a = b Or a = c Or b = c, "yes", "no")
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

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