М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
skilletsk
skilletsk
25.08.2022 16:45 •  Информатика

Оцените информационный объем цифрового моно звукового файла длительностью звучания 5 минут,если глубина кодирования звука 1 байт и частота дискретизации равна 48кгц

👇
Ответ:
Nbveh1234567890
Nbveh1234567890
25.08.2022
1.Информационный объем цифрового моно звукового файла длительностью 1 сек:
1 байт * 48000 =48000 байт

2. Длительностью 5 мин:

5*60*48000=14400000 байт ≈13.7 Мбайт
4,6(85 оценок)
Открыть все ответы
Ответ:
PascalABC.Net

const
//Формат файла
 //Фамилия имя номер    
fl = 'D:\phone.txt';  
var   
t : text;   
c : char;   
Fnm,s : string; 

begin 
assign (t,fl); 
reset (t);   

writeln ('Укажите фамилию'); 
readln (Fnm);  writeln();     

While not eof (t) do   
begin     
s := '';          

//Считываем фамилию
read (t,c);         
While c <> ' ' do       
begin       
s := s + c;       
read (t,c);       
end;

//Если Фамилию нужная то дочитываем            
//иначе переходим к следующему
if s = fnm then     
begin       
write (s+' ');       

While not eoln(t) do         
begin         
read (t,c);         
write (c);         
end;       
readln (t);       
writeln ();     
end 
   
else     
readln (t);        
end; 

close (t); 
end.
4,7(6 оценок)
Ответ:
TheMissteress
TheMissteress
25.08.2022
Const
n=10;
var
i,j,k,m,buf:integer;
a:array[1..n,1..n]of integer;
begin
    for i:=1 to n do
        begin
            writeln;
               for m:=1 to n do
                   begin
                       a[i,m]:=random(20);
                       write(a[i,m]:4);
                    end;
        end;
writeln;
writeln('k,j ?');
readln(k,j);
   for m:=1 to n do
      begin
          buf:=a[k,m];
          a[k,m]:=a[j,m];
          a[j,m]:=buf;
       end;
for i:=1 to n do
   begin
       writeln;
          for m:=1 to n do
              write(a[i,m]:4);
    end;
end.
                
4,8(2 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ