Ответ 13 107 200 бит = 1 638 400 байт = 1600 Кбайт
3) 1)
¬( (A*¬B)+(B*¬C) ) = (¬A*¬B)+(¬A*C)+(B*C) ?
¬(A*¬B) *¬(B*¬C) = ¬A¬*B+¬A*C+B*C ?
(¬A+B)*(¬B+C) = ¬A*¬B+¬A*C+B*C ?
¬A*¬B+¬A*C+B*C = ¬A*¬B+¬A*C+B*C доказано
3) 2)
(A*B)+¬(A*¬C) = (A*B)+A+¬C ?
A*B+¬A+C = A(B+1) +¬C ?
¬A+C ≠ A+¬C не равносильны
4) 1)
F=A*B*¬C + A*B*C + A*B
F=A*B*(¬C+C+1)
F=A*B
4) 2)
F= (A*B+A*B*¬C+B*¬C+C)*( ¬C+A*C+¬A*B*¬C)
F=( A*B*(1+¬C)+ B+C) * (¬C*(1+¬A*B)+A*C)
F=(A+C) * (A+¬C)
F=A+A*¬C+A*C
F=A
5)
X=?
¬(X+A)+¬(X+¬A)=B
¬X*¬A+¬X*A=B
¬X*(¬A+A)=B
¬X=B
X=¬B
В задаче используется массив, элементами которого являются числа: 3, 34, -16, 0, 105, -8, 27, 34, 506, -28. Какая из предложенн
дмитрий к-
2. <span>A: array[1..10] of integer;
byte только целые положительные</span>
// сумма 2 членов ряда = 1- 1/2+1/3=0.83333333 примерно
Program SumPosl;
Uses Crt;
var i,n:integer;
c:real;
begin
c:=1;
clrscr;
write('Введите n:' );
readln(n);
for i:=2 to (n+1) do
if odd(i)=false then c:=c-(1/i)
else c:=c+(1/i);
writeln('Сумма n членов ряда:',c:5:5);
readkey;
end.