Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
2^i = 100
i = 7 бит необходимо для кодирования любого от 1 до 100
64 * 7 = 448 бит = 56 байт
125 - 5/7
х - 2/7
х = (125 * 2/7) : 5/7 = 50 человек
var
i,j,k: integer;
s,p: string;
begin
p: ='abcdefghijklmnopqrstuvwxyzабвгдеёжзийклмнопрстуфхцчшщъыьэюя';
readln(s);
k: =0;
for i: =1 to length(s) do
for j: =1 to length(p) do
if s[i]=p[j] then k: =k+1;
writeln(k);
end.
Популярные вопросы