или кратко:
beginvar Rs := ReadArrInteger(3);Println('послед:', Rs.Sum);Println('парал:', 1/Rs.Sum(r->1/r));end.Пример работы:
или кратко:
beginvar Rs := ReadArrInteger(3);Println('послед:', Rs.Sum);Println('парал:', 1/Rs.Sum(r->1/r));end.Пример работы:
Необходимо найти вес одного символа(x):
2^x=N (^-степень)
N-мощность используемого алфавита
Чтобы найти х разделим объем(V) на кол-во символов в сообщении(k)
x=V:k
Чтобы найти кол-во символов в сообщении перемножим страницы,строки и символы:
k=4*30*50=6000символов
Далее переведем данный в условии объем в биты:
4500 байт=36000бит
x=36000:6000=6
2^6=64(символа)
ответ:мощность алфавита равна 64 символам.