Что бы закодировать информационный объем одного шарика нужно 5 бит.
По формуле 2^i=N
Где i - и есть иформационный объем одного элемента
а N - мощность алфавита(количества символов или как в нашем случаи количество шариков)
2^5=32
Ответ: 32 шарика
1.Берём чашку.
2.Ставим на стол
3.берём чайник
4.наливаем в него воду
6. ставим её греть
7.выключаем чайник после подогрева
8 достаём чай
9 ложим пакетик чая в чашку
10 заливаем водой
11.по желанию можно добавить сахар
12когда чай достаточно заварился,вытяни покетик с чаем
13. и выкинь его в мусорку
Const n = 100;
var
a: array[1..n] of real;
i,j,k: integer;
begin
writeln('Число элементов в массиве (k<=100)');
readln(k);
j := 0;
for i := 1 to k do
a[i] := random(101) - 50;
for i := 2 to k do
begin
if (a[i-1]>0) and (a[i]>0) or (a[i-1]*a[i]<0) then j:=j+1;
end;
writeln(j);
end.