ПОМОГИТЕ СРОЧНО!!!!1)постройте таблицу истинности для выражения A*(A*B*C+A)2) запишите

2
Ты не дописал программу ,пропустил тело цикла ,кроме writeln(s) до него должно быть что-то я полагаю.

1
A*(A*B*C+A)

A    B   C     A*B       A*B*C   (A*B*C+A)      A*(A*B*C+A)
0    0    0       0             0              0                      0
0    0    1       0             0              0                      0
0    1    0       0             0              0                      0
0    1    1       0             0              0                      0
1    0    0       0             0              1                      1
1    0    1       0             0              1                      1
1    1    0       1             0              1                      1
1    1    1       1             1              1                      1