Это невозможно. Ведь есть вероятность того,что карты рубашкой вверх не будут в 2 группах одинакового количества.
var a:array [1..100] of integer;
i,n:integer;
s:string;
Begin
randomize;
for i :=1 to 100 do
begin
a[i]:= random(1000)+1000;
a[i]:=a[i] mod 100;
a[i]:=a[i] div 10;
if a[i] mod 2 = 0 then n=n+1;
end;
writeln(n);
End.
1101100-108
1100101-101
1110000-112
1010010-82
35-100011
32-100000
49-110001
40-101000
Размер файла = 470 кБайт, а длительность 5 секунд. Посчитаем скорость потока данных: 470 кБайт / 5 с = 94 кБайт/с.
Стерео - значит 2 канала.
Половина потока приходится на левый канал, половина - на правый.
То есть на один канал приходится 94 / 2 = 47 кБайт/с
1 байт - это один отсчет звукового сигнала одного канала (так как глубина 8 бит = 1 байт)
Итого частота дискретизации одного канала 47 кБайт/с / 1 байт/отсчёт = 47*1024 = 48128 отсчётов в секунду, то есть частота дискретизации = 48128 Гц.