<span>"Не ошибается тот, кто ничего не делает, хотя это и есть его основная ошибка. " - эта фраза содержит 76 символов (включая пробелы и знаки препинания). К</span>аждый символ кодируется одним байтом, значит <span>информационный объём этой фразы 76 байт.</span>
Var i,d:integer;
uses crt;
Begin
for i:=1 to 20 do begin
d:=sqr(i);
end;
readln;
end.
Не проверял, накидал на быструю руку, но должно работать.
1. Мощность здесь - это количество символов - 16.
2. Р = 01
А = 100
Д = 00
А = 100
Р = 01
ДАР
3.
C D
CCC DDD
CCD DDC
CDC DCD
DCC CDD
5. N(мощность алфав.)=4 т.к. в этих словах использованы всего 4 буквы
6. 33-я; 2-б; 13-л; 16-о; 15-н; 33-я
Яблоня