Формула для кодирования звука:
V=k*i*v*t, где V - размер полученного звукового файла(в битах), i - глубина звука(разрешение)(в битах), v - частота дискретизации(в герцах), t - время записи(в секундах), k - кол-во каналов(моно -1 , стерео -2).
В данной задаче:
V=48 Мбайт=48*1024*1024*8 бит
v=64 кГц=64*1000 Гц
i=16 бит
k=2 (стерео)
t - ?
Находим t:
Так как нужно приблизительное значение, то для упрощения вычислений представим:
В итоге:
Переводим в минуты:
мин
Ответ: 3
Program Z1;
Var x,y:real;
begin
Write('Введите значение x = ');
Readln(x);
if x>=1 then y:=5*x else y:=sqr(x);
Write('y=',y);
End.
Пример:
Введите значение x = 3
y=15
Так как мощность равна 256, то на кодирование одного символа идёт 8бит или 1 байт.
Тогда 6*30*80=14400байт
14400:1024=14,0625кБайт
Ответ 14,0625
var a:array[1..10] of integer;
i:byte;
begin
for i:=1 to 10 do
read(a[i]);
for i:=1 to 10 do
writeln(a[i]*2);
end.