Два сообщения содержат одинаковое количество символов. количество информации в первом тексте в 1, 5 раза больше, чем во втором. сколько символов содержат алфавиты, с которых записаны сообщения, если известно, что число символов в каждом алфавите не превышает 10 и на каждый символ приходится целое число битов?

тут надо работать со степениями 2; от 0 до 10 только 2^1=2 (символа), 2^2=4 (символа) и 2^3=8 (символов), из этих вариантов нам подходят 2^2 и 2^3 т.к. символы первого текста кодируются 2 битами, а второго 3 битами (если разделить 3 на 2, то получится 1,5 - как сказано в ), значит в первом тексте 4 символа, во втором 8

// pascalabc.net 3.2, сборка 1353 от 27.11.2016 // внимание! если программа не работает, обновите версию! begin   var a: =readlnstring('ip=').towords('.');   if a.length< > 4 then       writeln('адрес - это четыре числа, разделенные точками')   else begin       var n: integer;       foreach var c in a do begin           if not trystrtoint(c,n) then begin               writeln(c,'- не целое число'); exit end           else               if n> 255 then begin writeln(c,' превышает 255'); exit end;           end;       writeln('ip-адрес корректен')         end end. примеры ip= 128.16.35.a4 a4- не целое число ip= 240.127.56.340 340 превышает 255 ip= 34.56.42,5 адрес - это четыре числа, разделенные точками ip= 128.0.0.255 ip-адрес корректен

░░░░░░░░░░░░░░░░░░░░░░░▄▄ ░░░░░░░░░░░░░░░░░░░░░▄▀░░▌ ░░░░░░░░░░░░░░░░░░░▄▀▐░░░▌ ░░░░░░░░░░░░░░░░▄▀▀▒▐▒░░░▌ ░░░░░▄▀▀▄░░░▄▄▀▀▒▒▒▒▌▒▒░░▌ ░░░░▐▒░░░▀▄▀▒▒▒▒▒▒▒▒▒▒▒▒▒█ ░░░░▌▒░░░░▒▀▄▒▒▒▒▒▒▒▒▒▒▒▒▒▀▄ ░░░░▐▒░░░░░▒▒▒▒▒▒▒▒▒▌▒▐▒▒▒▒▒▀▄ ░░░░▌▀▄░░▒▒▒▒▒▒▒▒▐▒▒▒▌▒▌▒▄▄▒▒▐ ░░░▌▌▒▒▀▒▒▒▒▒▒▒▒▒▒▐▒▒▒▒▒█▄█▌▒▒▌ ░▄▀▒▐▒▒▒▒▒▒▒▒▒▒▒▄▀█▌▒▒▒▒▒▀▀▒▒▐░░░▄ ▀▒▒▒▒▌▒▒▒▒▒▒▒▄▒▐███▌▄▒▒▒▒▒▒▒▄▀▀▀▀ ▒▒▒▒▒▐▒▒▒▒▒▄▀▒▒▒▀▀▀▒▒▒▒▄█▀░░▒▌▀▀▄▄ ▒▒▒▒▒▒█▒▄▄▀▒▒▒▒▒▒▒▒▒▒▒░░▐▒▀▄▀▄░░░░▀ ▒▒▒▒▒▒▒█▒▒▒▒▒▒▒▒▒▄▒▒▒▒▄▀▒▒▒▌░░▀▄ ▒▒▒▒▒▒▒▒▀▄▒▒▒▒▒▒▒▒▀▀▀▀▒▒▒▄▀ ▒▒▒▒▒▒▒▒▒▒▀▄▄▒▒▒▒▒▒▒▒▒▒▒▐ ▒▒▒▒▒▒▒▒▒▒▒▒▒▀▀▄▄▄▒▒▒▒▒▒▌ ▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▐ ▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▐