S=7.310096
P=19
Programa:
CLSa = 2: b = 8: c = 9r = (a + b + c) / 2p = a + b + cs = SQR(r * (r - a) * (r - b) * (r - c))PRINT "S="; sPRINT "P="; p
Program enot;
VAR p: array [1..7,1..9] of integer;
i,j,s:integer;
begin
s:=0;
for i:= 1 to 7 do
for j:= 1 to 9
do p[i,j]:= random (61)-25;
for i:= 1 to 7 do
begin
for j:= 1 to 9 do
begin
if p[i,j]<0 then s:=s+p[i,j];
write(p[i,j]:5);
end;
writeln();
end;
writeln(s);
<span>end.</span>
1. Для хранения цвета одного пикселя монохромного изображения требуется log(2)2=1 бит.
Объем изображения = 384*256*1 бит = 384*256/8 байт = 48*256/1024 Кбайт = 12 Кбайт.
2. Для хранения цвета одного пикселя изображения, в палитре которого 8 цветов, требуется log(8)2=3 бита.
Объем изображения = 768*512*3 бит = 768*512*3/(8*1024) Кбайт = 144 Кбайта.
В 1 байте = 24 бит потому что в 1 байт =1 бит
Скорее всего это процессор