Const N = 9;
var a: array[1..N] of integer;
i, sum: integer;
begin
sum := 0;
for i := 1 to N do begin
a[ i ] := random(12)-2;
write(a[i]:4);
if a[ i ] > 2 then sum := sum + a[ i ];
end;
writeln();writeln();
write(' Сумма всех чисел > 2: ', sum);
<span>end.</span>
var
s, s_new: string;
i: integer;
begin
read(s);
for i := 1 to length(s) do
s_new := s_new + s[i] + ' ';
writeln(s_new);
end.
Объем видеофайла=(объем видео + стерео звука) * время/сжатие
<span>видео шир выс объем кадра кадры видео бит
</span><span> 640 480 307200 25 7680000
</span><span>звук частота глуб каналы звук бит
</span><span> 22000 16 2 704000
</span><span>видео+ звук время время объем виде-файла без сжатия
</span><span>8384000 5мин*60 300 2515200000</span>
объем виде-файла с сжатием
251520000 бит
<span>245625 Кбит</span>
Если хранить число без знака, то
- в 1 байт помещаются числа от 0 до 255 (2⁸-1)
- в 2 байта помещаются числа от 0 до 65 535 (2¹⁶-1)
- в 3 байта помещаются числа от 0 до 16 777 215 (2²⁴-1)
- в 4 байта помещаются числа от 0 до 4 294 967 296 (2³²-1)
Задано число <span>33 554 433 и для его размещения потребуется <u>4 байта.</u>
Можно, конечно, этим всем не заниматься, </span>если есть возможность вычислять логарифмы. В данном случае логарифм по основанию 2, округленный в большую сторону до целых, даст необходимое для представления числа количество битов.
㏒₂<span>33554433 = ㏑</span><span>33554433/㏑2 ≈ 25.00000004 ⇒ 26 бит требуется
Переводим в байты</span>: 26/8 = 3.25 , т.е. потребуется <u>4 байта</u>.
Написал программу на языке QBasic, так как вы не указали язык.