Написать программу на языке Pascal Проверьте, верно ли, что количество строк матрицы A (n х n), в которой все числа нечетные, кратно заданному числу х.

1. Выпишите все числа, при которых значение данных логическое выражений истинно.
А) (х>12) и не (х>15)
(72>12) & !(72>15)
1 & !1 = 0

(98>12) & !(98>15)
1 & !1 = 0

(67>12) & !(67>15)
1 & !1 = 0

(14>12) & !(14>15)
1 & !0 = 1
Выражение истинно для X=14.

Б) (X оканчивается на 5) и не (х- не двузначное число)
1)72
0 & ! !1 = 0
2)98
0 & ! !1 = 0
3)67
0 & ! !1 = 0
4)14
0 & ! !1 = 0
Выражение ложно для всех чисел

2. При каких значениях логическое выражение ложно (возможно несколько ответов).
Не ( Х – четное число) или (оканчивается на 4)

1)72
! 1 + 0 = 0 + 0 = 0

2)98
! 1 + 0 = 0

3)67
! 0 + 0 = 1 + 0 = 1

4)14
! 1 + 1 = 0 + 1 = 1

Выражение ложно для X = 72 и 98

Порядок действий:
1 Отрицание-инверсия(не, обозначается - )
2Действия в скобках
3 Конъюнкция-умножение(и, обозначается&)
4 Дизъюнкция-сложение(или, обозначается галочкой)
истина-1,ложь-0 
например:
1галочка0&1 следуя по всем законам математики, сначала выполняется умножение т.е & значит 0*1=0, а затем выполняем сложение(галочка) 1+0=1 следовательно ответ истина
1) 1&0=0-ложь
2)1 галочка0=1-истина
3) не 1 галочка 0 - 0+0=0-ложь
4)1 & 0 галочка 1=1*0+1= 1-истина
5)1 галочка 0&1=1+0*1=1-истина
 6)не1 галочка 0 &1=0+0*1=0-ложь
7)(1галочка0) &(1галочка0)=(1+0)*(1+0)=1*1=1-истина
8)не(1галочка0) & (1галочка0)=не(1+0)*(1+0)=не1* 1=0*1=0-ложь
9)не(1&0&1)=не(1*0*1)=не(0*1)=не0=1-истина