вес i одного символа алфавита и количество символов n, из которых он состоит, связаны выражением n=2i, что обусловлено двоичной системой кодирования (например 1 и 0 или с любых двух знаков).
у нас в алфавите 128 символов, поэтому n=128.
128=2i, тогда i = 7 битов
это значит, что для кодирования одного символа предусмотрено 7 разрядов, т.е. с 0 и 1 мы можем зашифровать 128 разных знаков, например:
1111110
1111110
1111100
1111000 и так всего 128 комбинаций.
ответ: один символ алфавита несет в себе 7 битов информации.
Program n1; Uses Crt; var a: array[1..30,1..30] of integer; k,m,i,j,s: integer; begin for i:=1 to 18 do begin for j:=1 to 12 do begin a[i,j]:=random(5001)+5000; write(a[i,j]:6); end; writeln; end; writeln; s:=0; for i:=1 to 18 do s:=s+a[i,6]; writeln('Summa: ', s); end.
Высчитывает все правильно. Зарплату поставил от 5000 до 10000 тысяч рублей, строкой a[i,j]:=random(5001)+5000; (b-a+1)+a - формула для расчета интервала чисел, т.е. зарплату поставил от 5000 до 10000, получается: a = 5000 b = 10000 (10000-5000+1)+5000 = (5001)+5000; Если захочешь поменять сумму зарплаты, думаю поймешь теперь как. for i:=1 to 18 do s:=s+a[i,6]; - этой строкой изменяю i (т.е. работников), а j оставляю неизменным и равным 6, так как июнь 6-ой месяц по счету.
вес i одного символа алфавита и количество символов n, из которых он состоит, связаны выражением n=2i, что обусловлено двоичной системой кодирования (например 1 и 0 или с любых двух знаков).
у нас в алфавите 128 символов, поэтому n=128.
128=2i, тогда i = 7 битов
это значит, что для кодирования одного символа предусмотрено 7 разрядов, т.е. с 0 и 1 мы можем зашифровать 128 разных знаков, например:
1111110
1111110
1111100
1111000 и так всего 128 комбинаций.
ответ: один символ алфавита несет в себе 7 битов информации.
Uses Crt;
var a: array[1..30,1..30] of integer;
k,m,i,j,s: integer;
begin for i:=1 to 18 do begin
for j:=1 to 12 do begin
a[i,j]:=random(5001)+5000;
write(a[i,j]:6);
end;
writeln;
end;
writeln;
s:=0;
for i:=1 to 18 do
s:=s+a[i,6];
writeln('Summa: ', s);
end.
Высчитывает все правильно. Зарплату поставил от 5000 до 10000 тысяч рублей, строкой a[i,j]:=random(5001)+5000;
(b-a+1)+a - формула для расчета интервала чисел, т.е. зарплату поставил от 5000 до 10000, получается:
a = 5000
b = 10000
(10000-5000+1)+5000 = (5001)+5000;
Если захочешь поменять сумму зарплаты, думаю поймешь теперь как.
for i:=1 to 18 do s:=s+a[i,6]; - этой строкой изменяю i (т.е. работников), а j оставляю неизменным и равным 6, так как июнь 6-ой месяц по счету.