Для начала найдём "вес" одной буквы такого алфавита. Воспользуемся формулой:
где m - количество букв в алфавите, а n - минимальная степень числа "2", которая способна в себя уместить все буквы алфавита.
m=64, тогда
n=6
6 бит нужно для записи одной буквы.
По условию задачи нам нужно записать 60 таких символов.
360 бит нужно для записи 60 символов. Или 45 байт.
Var
k, p, s: integer;
begin
readln(k, p, s);
k := k * (100 + p);
writeln((100 * s) div k);
end.
Размер цифрового моноаудиофайла измеряется по формуле:
A = D*T*i,
где D – частота дискретизации (Гц), T – время звучания или записи звука, i - разрядность регистра (разрешение или глубина кодирования звука).
750 Кбайт = 750*1024 байт = 750*1024*8 бит
32 кГц = 32000 Гц
i = 750*1024*8 / (32000*12) = 16 бит
Ответ: 16 бит
Var
N,S,d:integer;
Begin
S:=0;
Write('N = ');ReadLn(N);
For d:= 1 to N do
if N mod d = 0 then S:=S+d;
WriteLn('S = ',S)
End.
Два раздела: (I) раздел описаний (блоки USES, LABEL, CONST, TYPE, VAR, а также описание процедур и функций) и (II) исполняемую часть (основной блок) . Раздел описаний, в принципе, не является обязательным и может вовсе отсутствовать. Заголовок программы, начинающийся с ключевого слова PROGRAM, выполняет исключительно декоративную функцию, и поэтому также может отсутствовать.
<span>Основной блок - это собственно программа, использующая все, что было описано и объявлено выше. Он обязательно начинается словом BEGIN и заканчивается словом END с точкой. Любой текст после завершающей точки игнорируется компилятором</span>