Условные операторы в VBasic
Формулировка задачи:
Очень нужно помогите плиз!!!!
Написать программу, которая проверяет, делится ли на три целое число, введенное с клавиатуры.
Решение задачи: «Условные операторы в VBasic»
textual
Листинг программы
Dim n As Long
Private Sub Command1_Click()
n = InputBox("X")
If n Mod 3 = 0 Then MsgBox "delitsa" Else MsgBox "ne delitsa"
End Sub