Размер цифрового моноаудиофайла измеряется по формуле: A = D*T*i,
где D – частота дискретизации (Гц), T – время звучания или записи звука(сек), i - глубина кодирования(байт)
т.к. у нас стерео файл, то он будет занимать в 2 раза больше места при тойже продолжительности(т.к. в нем хранится 2 монодорожки)
16 бит = 2 байта
А = 44000 * 300 * 2 = 26400000 байт = 25781,25 килобайт = 25,177 мегабайт
это для монофайла
а для стерео в 2 раза больше
52800000 байт = 51562,5 килобайт = 50,354 мегабайт
1)
var
a, b: integer;
begin
writeln('Введите a, b: '); readln(a, b);
if(b mod a = 0) then writeln('Является делителем')
else writeln('Не является делителем');
end.
2)
var
x, y, tmp: real;
begin
repeat
writeln('Введите x, y: '); readln(x, y);
until(x <> y);
if(x > y) then begin
tmp := y;
y := (x + y) / 2;
x := 2*(x * tmp);
writeln('Большее - X = ', x, ' Меньшее - Y = ', y);
end else begin
tmp := x;
x := (x + y) / 2;
y := 2*(tmp * y);
writeln('Большее - Y = ', y, ' Меньшее - X = ', x);
end;
end.
1) Встроенный динамик
2) Колонки
3) Наушники