Логическая операция и целый тип данных - PascalABC.NET

readln(a,b);
a:=a mod 2;
b:=b mod 2;
bol:=a and b;

Как совместить логический тип данных с целым? надо проверить истинность высказывания, что А и В нечетные. У самого не выходит.

Никто не поможет?

Листинг программы

bol:=(a mod 2) and (b mod 2);

Объяснение кода листинга программы

Объявляются переменные a и b типа Целое (Integer)
Вычисляется остаток от деления переменной a на 2 и сохраняется в переменную bol
Результат операции and (логическое И) сравнивается с 0
Если результат равен 0, то выполняется блок кода до тех пор, пока не будет получено значение bol, отличное от 0
Если результат не равен 0, то выполняется блок кода до тех пор, пока не будет получено значение bol, равное 0
В обоих случаях выводится значение переменной bol