Условные операторы в VBasic - VB

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

Очень нужно помогите плиз!!!! Написать программу, которая проверяет, делится ли на три целое число, введенное с клавиатуры.

Код к задаче: «Условные операторы в VBasic - VB»

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

10   голосов, оценка 3.700 из 5


СОХРАНИТЬ ССЫЛКУ