Проводилась одноканальная (моно) звукозапись с частотой дискретизации 16 кгц и 32-битным разрешением. в результате был получен файл размером 1 мбайт, сжатие данных не производилось. какая из ниже величин наиболее близка к времени, в течение которого проводилась запись?

Объем файла звукозаписи = 1 Мбайт = 1*1024кб=1*1024*1024*8бит
частота= 16кГц= 16000Гц - это кол-во снятий показаний величины звука в секунду(1 гц=1/секунда)
Тогда:
объем файла = частота * время звучания * разрешение => тогда выразим отсюда время звучания:
Время звучания = (1*1024*1024*8 бит)/(16000Гц * 32 бит) = 8388608 / 512000 = 16,384 сек.

Червь  – программа, которая делает копии самой себя. Ее вред заключается в захламлении компьютера, из-за чего он начинает работать медленнее. Отличительной особенностью червя является то, что он не может стать частью другой безвредной программы.Троянская программа (троянский конь, троян)Троянская программа маскируется в других безвредных программах. До того момента как пользователь не запустит эту самую безвредную программу,  троян не несет никакой опасности. Тронская программа может нанести различный ущерб для компьютера. В основном трояны используются для кражи, изменения или удаления данных. Отличительной особенностью трояна является то, что  он не может самостоятельно размножаться.

Program q1;
uses crt;
const n=10;
var i,j:integer;
mass:array [1..n] of integer;
countNum:integer; // переменная для хранения количества нечетных чисел
proizv:integer; // переменная для хранения произведения нечетных чисел
BEGIN
proizv:=1; // так как, изначально равно 0, а при умножении на 0 будет всегда 0
{создание последовательности n целых чисел}
Writeln('Случайные целые числа: ');
for i:=1 to n do
begin
mass[ i ]:=random(9)+1; //присваеваем переменной случайное значение от 1 до 10
write(inttostr(mass[ i ])+', ');
end;
{Вычисление произведения и количества нечетных чисел}
for i:=1 to n do
if mass[ i ] mod 2 <> 0 then //проверяем не четное-ли число, если да, то.. .
begin
inc(countNum); //увеличиваем на один кол-во нечетных чисел
proizv:=proizv*mass[ i ]; // высчитываем произведение
end;
{Вывод результатов}
writeln;
writeln('Всего нечетных чисел: '+inttostr(countNum));
writeln('Их произведение: '+inttostr(proizv));
END.