Var ar:array[1..10] of integer;
k,i,m:integer;
begin;
randomize;
k:=1;writeln('Array:');
for i:=1 to 10 do
begin;
ar[i]:=random(0,15);
if odd(i)=false then k:=k*ar[i];
write(ar[i]:4);
end;
writeln;
writeln('Result:',k);
if odd(k) then writeln('Yes') else writeln('No');
end.
<span>
//Мала вероятность того, что вернёт Yes, поэтому прикрутил Result
Вывод с 300-400 запуска:
Array:
9 15 8 15 5 3 0 15 3 9
Result:91125
Yes<span>
</span></span>
А)Мои документы
Б)Сетевое окружение
Простите если не правильно,но других вариантов я не знаю!
Ответ:
4!\2!⋅(4−2)!=4!\2!⋅2!=3⋅4\1⋅2=6
Объяснение:
!-факториал
ответ 6 вариаций
Вначале преобразуем второе слагаемое по закону де-Моргана. Потому что первое слагаемое никак нельзя упростить.
Получаем выражение, с которым можно обращаться по законам обычной алгебры
Дизъюнкция истинна всегда, кроме случая, когда оба значения переменных ложны, поэтому достаточно чтобы или x₁=1, или x₃=0. Или и то и другое одновременно.
Это реализуется для наборов x₁x₃ = 00 10 11 для любых x₂