var
i,s:integer;
Begin
s:=1;
for i:= 1 to 15 do
if i mod 2=1 then s:=s*i*i;
writeln(s);
End.
(A v не A) & (B & 1) = (A + -A) × (B × 1) = 0 × (B × 1)
Решение на pascal. Могут быть небольшие недочёты =)
<span>переменной A присвоить значение выражения D плюс 9</span>
А) 100101001,101
Б) 10000111,11
в)100111010,10010111
г) 10101,01010001011101110100010111010001011101000101