Для начала необходимо вычислить значение выражения: 3658979549970420
После переводим в шестеричную систему, деля число на 6 и записывая остатки в обратном порядке:
3658979549970420/6 -->0
609829924995070/6 --> 4
101638320832511/6 --> 5
16939720138751/6 -->5
2823286689791/6 -->5
470547781631/6 --> 5
78424630271/6 --> 5
13070771711/6 --> 5
2178461951/6 --> 5
363076991/6 --> 5
60512831/6 --> 5
10085471/6 --> 5
1680911/6 --> 5
280151/6 --> 5
46691/6 --> 5
7781/6 --> 5
1296/6 --> 0
216/6 --> 0
36/6 --> 0
6/6 --> 0
1 --> 1
100005555555555555540
Ответ: 5
<span><span>
Дано:
V=2,6 Мб
T=1 мин
Моно- ×1
H= ?
I= ?
Решение:
V= T ×I × H × 1; I × H= V / T
I × H= 2,6 Мб/1 мин. = 2,6×1024×1024×8 бит/ 60 сек=21810380,8/60=
363506,237
363506,237/8=45438,3
363506,237/16=22719,15
Ответ.
Если I=8 ,бит, то H=44,1 кГц.
Если I=16 бит, то H=22,05 кГц.
</span></span>
Запишем формулу
2^i=N
N=64
В какую степень возвести 2, чтобы получить 64?
В 6 степень
1 символ = 6 бит
100 символов соответственно весит 600 бит
<span>1. "в одном килограмме 1000 грамм" - считая пробелы в этом предложении 29 символов - следовательно предложение вест 29 байт
2. 35-10=25 значений, 25 лежит в рамках от 17 до 32, следовательно одно значение будет весить 5 бит. так как 2^5=32. было 27 измерений - 5*27=135. Ответ : объем всех результатов - 135 бит
3. Одна лампа равна одному биту, так как можно представить, что включено - 1, выключено - 0.
аналагично со второй задачей 200 лежит в рамках от 128(2 в седьмой степени) до 256(два в восьмой степени), значит для 200 разных сигналов потребуется 8 ламп</span>
Const
n = 40;
var
s,i,ind,k1,k2: integer;
mas: array[1..n] of integer;
begin
s := 0;
for i:=1 to n do s := s+ mas[i];
Writeln ('сумма элементов массива: ',s);
s := 1;
for i:=1 to n do s := s * mas[i];
Writeln ('произведение элементов массива: ',s);
s := 0;
for i:=1 to n do s := s + mas[i]*mas[i];
Writeln ('сумма квадратов элементов массива: ',s);
s := 0;
for i:=1 to 6 do s := s+ mas[i];
Writeln ('сумма первых 6 элементов массива: ',s);
ind:=0;
repeat
Writeln('Введите К1: '); read(k1);
Writeln('Введите К2: '); read(k2);
if (k2>k1) then ind := 1;
until (ind=1);
s := 0;
for i:=k1 to k2 do s := s+ mas[i];
Writeln ('сумма элементов массива с k1-го по k2-й: ',s);
end.