Логические операции. Результат сравнения может принимать только два значения: истина, когда высказы- вание справедливо

Условия

Результат сравнения может принимать только два значения: "истина", когда высказы- вание справедливо, или "ложь" — в противном случае. Говорят также, что истинность таких выражений либо "true" (t)(-1), либо "false" (f)(0).

Конструкция логических выражений в QBASIC довольно проста. В качестве сравниваемых значений (сравниваемых операндов) могут участвовать строки, числа, константы, переменные, арифметические и строковые выражения. Используют следующие операции сравнения:

Операция	Значение
>	больше
<	меньше
>=	больше или равно
<=	меньше или равно
=	равно
<>	Не равно

Схематически условие можно представить следующим образом:
Выражение_1 Операция_сравнения Выражение_2

Для того чтобы сравнить строки (т.е. применить операторы ">" или "<" к строковым данным), необходимо учитывать порядок расположения символов в таблице кодов ASCII: "О" < "1" <,...< "9 "< "А ",...< "Z" < "а" <... "z".
Итак, Строка_1 больше (меньше) Строки_2, если при посимвольном сравнении строк код первого несовпадающего символа из Строки_1 больше (меньше) кода соответствующего символа из Строки_2.
Числовые переменные(константы) сравниваются обычным образом.
Также в QВasic можно использовать переменные типа Boolean, т.е. переменные которым можно присвоить какое-то логическое выражение, и значение этой переменной будет зависеть от истинности или ложности определяющего выражения. Если значение выражения ложно, то переменной будет присвоено значение 0, а если истинно, то -1.

Пример:
'Использование логических выражений
А=2>5
B=6<=6
C=8<>9
PRINT A
PRINT B
PRINT C
END
'Конец программы

В результате на экране вы увидите:
0
-1
-1

Также в логических выражениях можно использовать логические операции AND(и), OR(или), NOT(не), XOR(исключающее или, либо). Приведём таблицу истинности и приоритет операций.

Выражение А	Выражение В	A AND B	A OR B	NOT A	A XOR B

В программах часто возникает необходимость описывать более сложные логические выражения.

Рассмотрим пример:
'Пример, подводящий читателя к применению более сложных логических условий
DIM zahl1%, zahl2%
CLS
INPUT "Ввести число 1, zahl1%
INPUT "Ввести число 2", zahl2%
'Конец программы

Предположим входные данные должны вводится только тогда, когда zahll % больше нуля, и одновременно zahl1% меньше нуля. Как проверить одно из условий, Вы уже знаете. Рассмотрим способ, позволяющий объединить оба условия.

Логическое И (AND)

AND (И) коньюктивно объединяет логические условия:
Условие_1 AND Условие_2 [AND Условие_3] …

Результат такого объединения лишь тогда истинен, когда истинно каждое отдельное условие.

Пример:
DIM zahl1%, zahl2%
CLS
DO
INPUT "Введите число 1> 0", zahl1%
INPUT "Введите число 2 < 0 ", zahl2%
LOOP UNTIL zahll %>0 AND zahl2% < 0
PRINT "Спасибо за корректный ввод"
'Конец программы

Только тогда, когда zahl1% > 0 и zahl2%< 0, значение всего логического выражения станет истинно, а значит, выполнение цикла закончится.

Логическое ИЛИ (OR)
OR (ИЛИ) дизъюнктивно объединяет логические условия:
Условие_1 OR Условие_2 [OR Условие_3...]

Результат такого объединения только тогда ложен, когда ложны все составляющие.

Пример:
DIM zahl1%, zahl2%
CLS
DO
PRINT "Число 1 или число 2 должно быть больше нуля"
INPUT "Введите число 1", zahl1%
INPUT "Введите число 2", zahl2%
LOOP UNTIL zahl1% >0 OR zahl2% >0
PRINT "Спасибо за корректный ввод"
'Конец программы

В этом примере выход из LOOP-цикла не произойдет только в том случае, если значение каждого из вводимых чисел будет меньше или равно нулю.

Логическое отрицание (NOT)
NOT инвертирует (меняет на противоположное) значение логического выражения, т.е. то, что было "ложь", становится "истиной" и наоборот.

Пример:
DIM zahl%
CLS
INPUT "Введите число " zahl%
IF NOTzahl% > 0 THEN
PRINT "Число не больше нуля"
ELSE
PRINT "Число больше нуля"
END IF
'Конец программы

Дата добавления: 2014-01-06