Уберите лишние скобки у данного логического выражения: y eqv (((x and y) or y)xor (x imp (x xor y))) а затем напишите программу, которая по введённым значениям x и y типа Bool, вычисляла бы истинно или ложно данное логическое выражение. vbs
Лишних скобок тут нет. Есть только те, без которых можно обойтись.
Dim x Dim y x = CBool(InputBox("x=")) y = CBool(InputBox("y=")) Msgbox y Eqv (x And y Or y Xor (x Imp x Xor y))
пишет ошибка,2 строка 11 символ
неверно скопировали
У меня же работает. аж в версии 2003
в блокноте VBS?
Ой... это же VBS у Вас.... а я написал для VBA. Тогда подождите....
Вводить в виде True и False если помните
если честно,вообще не понимаю
сохраняете файл с расширением VBS, потом просто кликаете его, запускается, будут два окна для ввода.... прямо там набираете True или False для каждой переменной. И получите ответ.