Формула Шенона: 2^I=N, где N - объём информации, I - количество бит.
I = [log_2 (N)] - округление в большую сторону
1 байте = 8 бит.
Задача 1
Трижды запускается либо красная, либо зелёная ракета.
N = 2^3 = 8
Ответ: 8
Задача 2
I = [log_2 (800)] = [9.6438] = 10 бит на ученика
Объём 320 учащихся = 320 * 10 = 3200 бит = 400 байт
Ответ: 4
Задача 3
I = [log_2 (10+12+12)] = [5.0875] = 6 бит на символ
6 * 11 = 66 бит = 8.25 байт ~= 9 байт
9 * 60 = 540 байт
Ответ: 3
Задача 4
I = [log_2 (5*5)] = [4.6439] = 5 бит на клетку
15 ходов + начальная позиция = 16 клеток
16 * 5 бит = 80 бит = 10 байт
Ответ: 1
<h3>PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018</h3>
function ReadWhileSum(cond: integer->boolean): sequence of integer;
begin
var s := 0;
while True do
begin
var x := ReadInteger();
s += x;
if not cond(s) then break;
yield x;
end;
end;
begin
Println('Сред. арифм. =',ReadWhileSum(sum -> sum < 150)
.Where(t->t.IsEven).Average);
end.
Прикладная программа— это любая конкретная программа,
способствующая решению
какой-либо задачи в пределах данной проблемной области.
Решим задачу наоборот:
25->4;
Команда 1: Подели на 3;
Команда 2: Прибавь 1.
1) 25 + 1 = 26 (2).
2) 26 + 1 = 27 (2).
3) 27 : 3 = 9 (1).
4) 9 : 3 = 3 (1).
5) 3 + 1 = 4 (2).
Так как решали наоборот, то соответственно пишем ответ снизу-вверх.
Ответ: 21122.
К слову, порядок команд в задании и объяснении противоречат друг другу, то есть в задании: 1) *3. 2) -1.
А в объяснении: 1) -1. 2) *3.
Если условие в объяснении верно, то ответ будет: 12211.