Логические операции применяются при написании многих программ в Pascal. Все операции имеют определенный приоритет выполнения : Первой выполняется операция NOT. Второй выполняется операция AND. Последними выполняются операции OR и XOR (Они имеют одинаковый приоритет и при отсутствии скобок выполняются слева направо).
Заканчивая тему логического типа, напишем еще одну программку. Составим выражения, которые будут определять, является ли студент первокурсником, получающим стипендию.

program number20;
uses crt;
var Stip:Boolean;
Kurs1:Boolean;
Rez:Boolean;
begin
clrscr;
stip:=true;
kurs1:=true;
rez:=stip and kurs1;
writeln (‘Студент является первокурсником со стипендией? - ’,rez);
stip:=false;
rez:=stip and kurs1;
writeln(‘Студент является первокурсником со стипендией? - ’,rez);
readln
end.

В строке №3 переменная для определения наличия у студента стипендии.

В строке №4 переменная для определения, является ли студент первокурсником.

В строке №5 определяем результат.

Строка №8. Здесь мы присвоили переменной «stip» значение «true» (правда), т.е. студент получает стипендию.

Строка №9. Здесь мы присвоили переменной «kurs1» значение «true» (правда), т.е. студент является первокурсником.

Строка №10. Переменной «rez» присваивается значение переменных «stip» и «kurs1». Между ними стоит «and», значит, если обе переменные будут истинными, то и результат будет истинным. В нашем случае обе переменные («stip» и «kurs1») – «true», значит, и результат будет «true». Т.е. студент будет являться первокурсником со стипендией.

Строка №11. Выводим результат.

Строка №12. Здесь мы перезаписываем переменную «stip», присваивая ей значение «false» (ложь), т.е. студент не получает стипендию.

Строка №13. Переменной «rez» присваивается значение переменных «stip» и «kurs1». Между ними стоит «and», значит, если обе переменные будут истинными, то и результат будет истинным. В нашем случае одна переменная («kurs1») - true, а другая («stip») - false значит результат будет false.

Строка №14. Выводим результат.