1.Отправка смс/ммс.
2.Снятие денег со счета моб.телефона.
3.Блокировка экрана.
64 символа => 2^6=64 => 6 бит/символ 7200 байт = 7200*8 = 57600 бит 57600/6=9600 символов в сообщении 9600/4/40=60 символов в строке.
Такие задачи лучше всего(проще и быстрее) решать через 16-ричную систему.
Гляди
123 = 7Bh = 0111 1011b = 001 111 011b = 173(8)
147 = 93h = 1001 0011b = 010 010 011b = 223(8)
Ну и так далее, всё просто! А для перевода 10->16 пользуйся стандартным алгоритмом, то есть последовательно дели на 16.
Например
123/16 = 7 (ост 11), значит 123 = 7Bh (Цифра B - это 11 в 10-тичной системе).
<em>// PascalABC.NET 3.3, сборка 1555 от 21.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
Writeln(('осень'+NewLine)*ReadInteger('n='))
end.
<u>Пример</u>
n= 5
осень
осень
осень
осень
осень