мне сегодня нужно сдать 8 класс 1 Построение таблиц истинности для логических выражений.
Постройте таблицы истинности для логических выражений:
а) A & B ∨ ¬ A & B
б) (A ∨ B) & (¬ A ∨ B)
2 Построение таблиц истинности для логических выражений.
Постройте таблицы истинности для логических выражений:
а) ( A & B) ∨ (A ∨ B)
б) A ∨ B & ¬ A ∨ B
3 Построение таблиц истинности для логических выражений.
Постройте таблицы истинности для логических выражений:
а) A ∨ B ∨ ¬ A ∨ B
б) (A & B) ∨ (¬ A & B)
написать вывод
R1, R2, R3, S1, S2, S3: Integer;
begin
writeln('Введите размеры рации и чемодана');
readln(R1, R2, R3, S1, S2, S3);
if ((R1 < S1) and (R2 < S2) and (R3 < S3)) or
((R3 < S3) and (R2 < S1) and (R1 < S2)) or
((R1 < S1) and (R2 < S3) and (R3 < S3)) or
((R2 < S2) and (R1 < S3) and (R3 < S1)) or
((R2 < S1) and (R3 < S2) and (R1 < S3)) or
((R1 < S2) and (R3 < S1) and (R2 < S3)) then
WriteLn('ПОМЕЩАЕТСЯ')
else
WriteLn('НЕ ПОМЕЩАЕТСЯ');
end.