1.Определить объем памяти для хранения цифрового аудиофайла, время звучания которого 9 минут при частоте дискретизации 44, 1 КГц и глубине кодирования 16 битов. 2.Одна минута записи цифрового аудиофайла занимает на диске 1, 3 Мбайт, разрядность звуковой платы — 8. С какой частотой дискретизации записан звук? 3.Две минуты записи цифрового аудиофайла занимают на диске 5, 1 Мбайт. Частота дискретизации — 22 050 Гц. Какова разрядность аудиоадаптера? 4.Объем свободной памяти на диске — 0, 01 Гбайт, разрядность звуковой платы — 16. Какова будет длительность звучания цифрового аудиофайла, если его записать с частотой дискретизации 44 100 Гц?
Ответы
1)
var a,b,a1,b1:real;
var s,s1:real;
begin
WriteLn('Введите все катеты через пробел:');
Read(a,b,a1,b1);
s:=a/2*b;
s1:=a1/2*b1;
WriteLn(s);
WriteLn(s1);
if s = s1 then
WriteLn('Треугольники равновелики')
else if s>s1 then
WriteLn('Площадь первого треугольника больше на '+(s-s1))
else
WriteLn('Площадь второго треугольника больше на '+(s1-s));
end.
2)
var a,b:Integer;
var arr:array of char;
begin
arr:=ReadString().ToCharArray();
for var i:= 1 to 6 do
if(i<4) then
a+= strtoint(arr[i-1])
else
b+= strtoint(arr[i-1]);
if a=b then
WriteLn('Билет счастливый')
else
WriteLn('Билет не счастливый');
end.
var a,b,a1,b1:real;
var s,s1:real;
begin
WriteLn('Введите все катеты через пробел:');
Read(a,b,a1,b1);
s:=a/2*b;
s1:=a1/2*b1;
WriteLn(s);
WriteLn(s1);
if s = s1 then
WriteLn('Треугольники равновелики')
else if s>s1 then
WriteLn('Площадь первого треугольника больше на '+(s-s1))
else
WriteLn('Площадь второго треугольника больше на '+(s1-s));
end.
2)
var a,b:Integer;
var arr:array of char;
begin
arr:=ReadString().ToCharArray();
for var i:= 1 to 6 do
if(i<4) then
a+= strtoint(arr[i-1])
else
b+= strtoint(arr[i-1]);
if a=b then
WriteLn('Билет счастливый')
else
WriteLn('Билет не счастливый');
end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Ккакому виду ппо относятся образовательные программы
Автор: Никитина580
Вычислить значения функций: F=3z-ln(xz)-2z²
Автор: Pochkun-Oleg
Перевести числа 1100₂→_₁₀ 55₈→_₁₀ 501₁₀→_₈ 180₁₀→_₁₆
Автор: vera4
2) 2^7=128. Глубина цвета 128
3) 512=2^9. Для каждого цвета выделяется 9 бит
4) Количество пикселей (точек)=256*512=(2^8)*(2^9)=2^(8+9)=2^17 px.
Определим вес каждого пикселя: 16=2^4, те каждый пиксель весит 4 бита
Вес картинки=(2^17)*4=(2^17)*(2^2)=2^(17+2)=2^19 бит=(2^19):(2^13)=2^6=64 Кбайта
5) вес изображения 64 Кбайта=(2^6)*(2^13) бит=2^19 бит.
Количество пикселей=1024*512=(2^10)*(2^9)=2^19 px
Вес каждого пикселя: 2^19 бит/2^19 px=1 бит
Количество цветов в палитре=2^1=2 цвета в палитре
6) Палитра RGB (Red-Green-Blue), по 2 шестнадцатеричной цифры на цвет.