Помогите найти ошибку в программе на паскале

{ программа бортовой пк }

var

S: string ;

A, B, C, D, E, F, G : Boolean;

begin

Write('Улица A:'); Readln(S); A:=S='1';

Write('Улица B:'); Readln(S); B:=S='1';

Write('Шлагбаум F:'); Readln(S); F:=S='1';

Write('Улица С: '); Readln(S); C:=S='1';

Write('Улица D:'); Readln(S); D:=S='1';

Write('Улица E:'); Readln(S); E:=S='1';

Write('Шлагбаум G:'); Readln(S); G:=S='1';

if A and B not F or C and D or E not G

then S:='Поехали'

else S:='Постоим';

Writeln(S); Readln;

end.

Выводит ошибки при компиляции:
First compilation of c:\fpc\programm\z_p_13_1.pas
Z_P_13_1.pas(13,22) Fatal: Syntax error, "THEN" expected but "not" found
Z_P_13_1.pas(0) Fatal: Compilation aborted

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.