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

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

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


textual

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

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
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.


СДЕЛАЙТЕ РЕПОСТ

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

Источник