1. Определим размер файла, содержащего 1с записи.
Частота дискретизации по времени 16 кГц означает, что за 1с снимаются 16000 отсчетов громкости в каждом канале, а всего 4×16000=64000 отсчетов..
Частота дискретизации по уровню громкости (разрешение) составляет 32 бита или 32/8=4 байта и поэтому файл запись потребует для хранения одной секунды 64000×8=512000 байт = 512000/1024 = 500 Кбайт.
2. Найдем время записи
60 Мбайт = 60×1024 = 61440 Кбайт - общий объем файла
61440/500 = 122.88 с = 2 мин 2.88 с
Ответ: а) 2 мин.
<span>//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)</span>
1)
begin
var a:=ReadString('Введите слово->').ToLower;
Println(a=ReverseString(a)?'Перевертыш':'Не перевертыш');
end.
Пример(1):
Введите слово-> Комок
Перевертыш
Пример(2):
Введите слово-> Револьвер
Не перевертыш
2)
begin
var a:=ReadInteger('Число-> ');
Range(1,a).Where(t->a mod t=0).Println;
end.
Пример:
Число-> 100
1 2 4 5 10 20 25 50 100
3)
begin
for var i:=2 to 10000 do
begin
var a:=Range(1,i-1).Where(t->i mod t=0).Sum;
if a=i then Write(i,' ');
end;
end.
Ответ:
6 28 496 8128
Ответ:выход их лабиринта
Объяснение:знак выход избушка лабиринт а
Так как я понял. Мы не вычислительная техника и поэтому мы не можем выполнять больше 2 сложных дел.
Program mb;var a,b:integer;beginclrscr;writeln('vvedite a,b');readln(a,b);if a>b then writeln('большим является a')else writeln('большим является b');end.
