Для перевода чисел из десятичной системы счисления в двоичную используют так называемый "алгоритм замещения", состоящий из следующей последовательности действий:
Делим десятичное число А на 2. Частное Q запоминаем для следующего шага, а остаток a записываем как младший бит двоичного числа. Если частное q не равно 0, принимаем его за новое делимое и повторяем процедуру, описанную в шаге 1. Каждый новый остаток (0 или 1) записывается в разряды двоичного числа в направлении от младшего бита к старшему. Алгоритм продолжается до тех пор, пока в результате выполнения шагов 1 и 2 не получится частное Q = 0 и остаток a = 1Пример:
35(в десятичной)
35/2=17 35-2*17=1
17/2=8 17-2*8=1
8/2=4 8-2*4=0
4/2=2 4-2*2=0
2/2=1 2-2*1=0
1/2=0 1
записываем число снизу вверх:100011
35=100011
1. 2,5 сек
2. 16 000 байт
Объяснение:
1.
I = t * f * i * k, где
I - информационный объём аудио файла (размер файла, содержащего запись звука)
t - длительность звучания (секунды)
f - частота дискретизации (Гц, количество значений амплитуды звука, фиксируемых за одну секунду)
i - глубина звука (разрешение) (число бит, используемых для хранения каждого измеренного значения)
k - количество каналов записи (1 - моно, 2 - стерео и т.д.)
Дано:
I = 468,75 Кбайт = 3 840 000 бит
i = 16 бит
f = 48 кГц = 48 000 Гц
k = 2
Найти:
t
I = t * f * i * k
t = I / (f * i * k)
t = 3 840 000 / (48 000 * 16 * 2) = 3 840 000 / 1 536 000 = 2,5 сек
2.
I = K * i, где
I - информационный объём изображения (размер файла, содержащего изображение)
K - количество точек (пикселей)
i - глубина цвета (число бит, используемых для записи цвета одного пикселя)
N = 2^i, где
N - количество цветов в палитре
i - глубина цвета (число бит, используемых для записи цвета одного пикселя)
Дано:
К = 640 * 200 = 128 000 пикселей
N = 2 цвета
Найти:
I
2 = 2^i
2 = 2¹
i = 1 бит
I = 128 000 * 1 = 128 000 бит = 16 000 байт = 15,625 Кбайт
1 байт = 8 бит
1 Кбайт = 1024 байт
1 кГц = 1 000 Гц
var
res:integer;
n, i, a:integer;
begin
write('Введите кол-во товаров: ');
readln(n);
write('Введите цены: ');
for i := 1 to n do
begin
read(a);
res := res + a;
end;
write('Стоимость покупки = ');
writeln(res);
end.