Круг получается...............
<span>1 килобайт = 1024 байта
1 мегабайт = 1024 килобайта = 1024*1024 байт = 1048576 байт</span>
Const
n=15;
var
s:array[1..n] of real;
st,p:real;
i,k:integer;
begin
Writeln('Введите ',n,' сумм остатков');
st:=0;
for i:=1 to n do
begin Read(s[i]); st:=st+s[i] end;
Writeln('Удельные веса остатков по магазинам');
k:=0;
for i:=1 to 15 do
begin
p:=s[i]/st*100;
Writeln(i,' - ',p:0:1);
if p>12 then Inc(k)
end;
Write('Количество магазинов с уд. весом остатков >12%, равно ');
Writeln(k)
end.
<em><u>Тестовое решение:</u></em>
Введите 15 сумм остатков
0.37 1.5 2.11 3.4 9.3 2.89 4 0.85 0 0.73 4.2 5.05 3.5 2.18 0.94
Удельные веса остатков по магазинам
1 - 0.9
2 - 3.7
3 - 5.1
4 - 8.3
5 - 22.7
6 - 7.0
7 - 9.8
8 - 2.1
9 - 0.0
10 - 1.8
11 - 10.2
12 - 12.3
13 - 8.5
14 - 5.3
15 - 2.3
Количество магазинов с уд. весом остатков >12%, равно 2
<em><u>Полное решение по заданию находится в файле формата MS Word-2003</u></em>
1. Переведите в байты:560 бит = 560:8 = 70 байтов
<span>3024 бита = 3024:8 =378 байтов
</span>
2. Переведите в биты:540 байтов = 540*8 = 4320 бит
2,5 Кб = 2,5*1024*8= 2560*8 = 20480 бит
2 Гб = 2*1024*1024*1024*8 = 171798184 бита
3. Переведите в килобайты:1024000 бит = (1024000:8):1024 = 125 Кб
9240 байтов = 9240:1024 ≈ 9,02 Кб
4. Заполните пропуски числами:а) 3, 5 Кбайт = 3584 байт = 28672 бит
б) 3, 5 Гбайт = 3584 Мбайт = 3670016 Кбайт
Задача 1 Ответ: 312 бит
Задача 2Ответ: 7,3 Кбайт
Задача 3Ответ: 547
Задача 4Ответ: 32768