Использовать Робот
алг
нач
нц пока не слева свободно и не сверху свободно
если не слева свободно и не сверху свободно то
закрасить
вниз
все
кц
нц пока не слева свободно и снизу свободно
вниз
кц
нц
пока не слева свободно и не снизу свободно
закрасить
вправо
кц
нц
пока не снизу свободно и справа свободно
вправо
кц
нц
пока не справа свободно и не снизу свободно
закрасить
вверх
кц
нц
пока не справа свободно и сверху свободно
вверх
кц
закрасить
нц пока не сверху свободно и слева свободно
влево
кц
кон
Var C2, C1: longint;
a, b, n: integer;
begin
readln(a, b, n);
b := b + a * 100;
C1 := b * n;
C2 := C1 mod 100;
C1 := C1 div 100;
writeln(C1, ',', C2);
<span>end.
Вот так =)</span>
В строке 16 символов (включая пробелы).
Различных символов 11 (это "П", "р", "и", "е", "д", "у", " ", "в", "ч", "т", "г"). Так как 2^3 < 11 < 2^4, то на кодирование одного символа нужно не менее 4 бит.
Объем сообщения 16 символов * 4 бит/символ = 16 * 4 бит = 8 байт
(1 байт = 8 бит).
1.Возьми персик из пакета, открой воду, вымай персик, закрой воду, положи персик на тарелку.
2. Есть персики в пакете? Есть персики на тарелке?
3. Нет персиков в пакете? Нет персиков на тарелке?