Составьте программу, определяющую является ли данное число кратным 4.
VB. Dim x as Integer x=InputBox("Введите x:") If x mod 4 =0 then MsgBox("Число кратно 4") else MsgBox("Число НЕ кратно 4")