Question

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

Answer 1

VB.

Dim x as Integer
x=InputBox("Введите x:")
If x mod 4 =0 then MsgBox("Число кратно 4") else MsgBox("Число  НЕ кратно 4")