Question

Составьте программу, проверяющую, что введенное число является четным или нечетным. на VBA

Answer 1

x = InputBox("Введи число")
If x Mod 2 = 0 Then MsgBox ("Четное") Else MsgBox ("Нечетное")