Последовательности длиной 7, содержащей 5 букв А могут быть следующими: ** (* - любой из символов В или С) *А* ААА*АА* АА*ААА* А** ** (пока 6 вариантов) Далее - аналогично: **А ААА*А*А АА*АА*А А*ААА*А **А (ещё 5 вариантов) ААА**АА АА*А*АА А*АА*АА *ААА*АА (ещё 4 варианта) АА**ААА А*А*ААА *АА*ААА (ещё 3 варианта) А** *А* (ещё 2) ** (ещё 1) Итого: 6+5+4+3+2+1=21 Так как на месте * могут быть любые из 2 символов В или С, то это даст ещё по 4 варианта для каждого случая. Можно здесь, конечно, комбинаторику вспомнить. Итого: 21*4 = 84
1) Логическое выражение (A v С) & В соответствует данному фрагменту таблицы истинности;
2) Логическое выражение (A v В) & (С → А) не соответствует данному фрагменту таблицы истинности, т. к. уже на первом наборе значение рассматриваемого логического выражения не совпадает со значением F. Проведение дальнейших вычислений не имеет смысла;
3) Логическое выражение (А & В v С) & (В → А & С) не соответствует данному фрагменту таблицы истинности;
4) Логическое выражение (А → В) v (С v А → В) соответствует данному фрагменту таблицы истинности.
begin
var a := ArrRandom(10, -5, 5);
a.Println;
a.Where(t -> t = 0).Aggregate(1, (p, q)-> p * q).Println
end.
-4 -4 -2 -5 -2 0 -5 -2 -3 00