Логическое выражение: ¬(a∧b∧¬c)
Его можно также привести к другому виду:
Таблица истинности приведена во вложении.
Uses GraphABC;
begin
LockDrawing;
for var i:=1 to 800 do
begin
Window.Clear;
Brush.Color := clGray;
FillRectangle(i+10,90,i-110,430);
Brush.Color := clRed;
Ellipse(i,100,i-100,200);
Brush.Color := clYellow;
Ellipse(i,210,i-100,310);
Brush.Color := clGreen;
Ellipse(i,320,i-100,420);
Redraw;
Sleep(1);
end;
for var i:=1 to 900 do
begin
Window.Clear;
Brush.Color := clBlack;
Ellipse(i,100,i-200,300);
Brush.Color := clWhite;
Ellipse(i-1,101,i-199,299);
Brush.Color := clRed;
Ellipse(i-20,120,i-180,280);
Brush.Color := clWhite;
FillRectangle(i-50,180,i-150,220);
Redraw;
Sleep(1);
end;
end.
1. Для кодирования одного пикселя, который может принимать один из 16 цветов необходимо
i1 = ln(16) = 4 бит;
Для кодирования одного пикселя, который может принимать один из <span>4294967296</span> цветов необходимо <span>i2 = ln(1</span><span>4294967296</span><span>) = 32 бита;</span>
<span>Ответ: P = i2/i1 = 8 - во столько раз увеличится объем занимаемой памяти изображения.</span>
<span>2. Определим количество памяи которое занимает изображение:</span>
<span>S = 640*480*3= 921600 ,байт</span>
Определим скорость модема:
Ответ: V = 921600/256 = 3600 байт/с
Винчестер, СД-ром, ДВД, флешка
