Переведём число в 2 СС. нацело оно не переведется, поэтому переводим до стольки знаков после запятой, чтобы их общее кол-во вместе с целой частью было =24;
0,002489 в 10 СС= 0,00000000101000110001111 в 2 СС
р=1
Мр=1000001
1100|0001|0000|0000|0101|0001|1000|1111
C 1 0 0 5 1 8 F
<span>Ответ:C100518F</span>
1 символ - 5 бит. 145 символов - 725 бит
V=WxHxn
256=2^8
2^8=2^n
n=8
V=100*500*8=400000
V2=WxHxn2
16=2^4
2^4=2^n
n=4
V2=100*500*4=200000
Объем уменьшился
V/V2=2(в два раза)
V-V2=20000(на 200000)
Можно как то так:
var
M: real;
x: integer;
begin
for x := 1 to 100 do
begin
M := 2 / Sin(x);
Println('x=', x, '; M=', M);
end;
end.