Дано:
N = 33 символов
k = 5 * 20 * 60 = 6000 символов
По формуле N=2^i вычисляем i и получаем, что i приблизительно равно 5
Теперь зная i используем формулу I = i * k и получаем =>
I = 5 * 6000
I = 30 000
Теперь переводим биты в байты => 30 000 / 8 = 3750 Байт
Ответ: 3750 Байт
При X меньшем или равном(<=) 90
Для равновероятных событий справедлива формула Хартли. N=2^i. Где N количество событий, а i- количество информации, которое несет каждое из них. В задаче i=3, значит N=2^3, N=8.
Program by_Relhem;
var a,b,c,S:real;
begin
writeln ('Введите гипотенузу и катет, разделяя их пробелом');
read (a,b);
if a>b then
c:=sqrt(sqr(a)-sqr(b));
if b>a then
c:=sqrt(sqr(b)-sqr(a));
S:=0.5*(a*b);
writeln ('Катет: ',c, ' Площадь: ',S);
end.
<em>// PascalABC.NET 3.2, сборка 1338 от 16.11.2016</em>
begin
// Вводим строку с клавиатуры, приводим буквы к строчным,
// разбиваем на слова по пробелу и помещаем их в массив aW
var aW:=ReadlnString('->').ToLower.ToWords;
// Пропускаем массив через фильтр, оставляющий слова, содержащие
// русскую букву "а" и подсчитываем, сколько слов прошло через него.
// Полученное количество выводим.
Writeln('Слов с "а": ',aW.Where(w->Pos('а',w)>0).Count)
end.
Пример
-> Наша Таня громко плачет: уронила в речку мячик
Слов с "а": 4