Сколько существует различных наборов значений логических переменных x1, x2, x10, которые удовлетворяют всем перечисленным ниже условиям?
(x1 ∧ x2) ∨ (¬x1 ∧ ¬x2) ∨ (x2 ∧ ¬x3) ∨ (¬x2 ∧ x3) = 1
(x2 ∧ x3) ∨ (¬x2 ∧ ¬x3) ∨ (x3 ∧ ¬x4) ∨ (¬x3 ∧ x4) = 1
(x8 ∧ x9) ∨ (¬x8 ∧ ¬x9) ∨ (x9 ∧ ¬x10) ∨ (¬x9 ∧ x10) = 1
в ответе не нужно перечислять все различные наборы значений переменных x1, x2, … x10 при которых выполнена данная система равенств. в качестве ответа вам нужно указать количество таких наборов.
Текст программы:
Option Explicit
Private Sub cmdStart_Click()
Const T = 360 'Условное количество дней в году
Dim PV As Double, FV As Double, r As Double, n As Double
Dim d1 As Date, d2 As Date
PV = Cells(1, 2).Value
FV = Cells(2, 2).Value
r = Cells(3, 2).Value
d1 = Cells(4, 2).Value
n = (FV / PV - 1) * T / r
If n <> Int(n) Then n = n + 1
d2 = d1 + n
Cells(5, 2).Value = d2
End Sub