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

Гц битов =  192000 байт =  187,5 кб: )

Первое , программа задает массив, сортирует его, затем сравнивает элемент с последующем uses crt; var a: array[1..100] of integer; i,j: integer; procedure swap(var x,y: integer);     var t: integer;   begin     t : = x;     x : = y;     y : = t   end; begin for i: =1 to 100 do a[i]: =random(100); for j: =1 to 99 do for i: =1 to 100-j do if a[i] > a[i+1] then swap(a[i],a[i+1]); for i: =1 to 99 do if a[i]=a[i+1] then begin writeln(a[i]); writeln(a[i+1]); end; end. второе . программа также сортирует и сравнивает элементы uses crt; var a: array[1..100] of integer; i,j: integer; procedure swap(var x,y: integer);     var t: integer;   begin     t : = x;     x : = y;     y : = t   end; begin for i: =1 to 100 do a[i]: =random(100); for j: =1 to 99 do for i: =1 to 100-j do if a[i] > a[i+1] then swap(a[i],a[i+1]); for i: =1 to 99 do if a[i]< > a[i+1] then begin writeln(a[i]); end; end.

C++ #include< iostream> using namespace std; int main(){   #pragma warning (disable: 4996);     int i=0,j,a,b,c;   scanf("%d",& a);   for(j = 0; j< a; j++){     scanf("%d%d",& b,& c);     if(b > = 19){           continue;     }     if(b == 18 & & c > 30){           continue;       }       i++; } printf("%d",i); return 0; } если вы что-то не поняли или нашли ошибку, то напишите, , автору.