Размер цифрового моноаудиофайла измеряется по формуле:
A1 = D*T*i,
Размер стереозаписи (без сжатия) измеряется по формуле:
A2 = 2*D*T*i,
где D – частота дискретизации (Гц), T – время звучания или записи звука, i - разрядность регистра (разрешение или глубина кодирования звука).
A2 = 2*(D/4)*(5*i) = 2,5*A1 = 2,5*38 = 95 Мбайт
Var S,n,A:integer;
Begin
Write('n = ');ReadLn(n);
For n:= 10 to n+9 do
Begin
A:=n;
S:=0;
While A > 0 do
Begin
S:=S+A mod 10;
A:= A div 10
End;
WriteLn('Сумма цифр ',n,' равна: ',S)
End;
End.
Основной текст в Египте писали чёрной краской ,чтобы выделить начало строки или фразы писали красным .(Но выделяли редко -писчий материал был дорогим).