Var
i:integer;
begin
for i=1 to 20 do
write(i:3);
end.
(i:3 - вывод i на 3 позициях( т. к. если выводить подряд, то все будет без пробелов))
25 Гбайт = 214748364800бит
2048Кбайт = 2Мбайт
140 Мбайт = 1174405120
2028 Кбайт = 15,84 Мбит
5 Гбайт = 42949672960 бит
<span>Д) Все буквы текста выбранной ячейки преобразуются в строчные</span>
Задача 1.
Считаем количество пикселей: 640*480.
Умножаем на 8 бит.
Получили Количество информации в битах.
Скорее всего, надо еще перевести в байты или килобайты, то есть разделить на 2^3 в первом случае или на 2^13 во втором.
Задача 2.
Считаем глубину кодирования цвета: 64 = 2^6, значит, 6 бит.
Считаем количество пикселей 32*32 = 2^10.
Перемножаем и переводим в байты, то есть делим на 8.
1 байт = 8 бит.
128 бит = 128 / 8 байт = 16 байт
1 Кбайт = 1024 байт = 8192 бит