Вот : чтобы обеспечить высокое качество воспроизводимого звука в профессиональной аппаратуре для студий звукозаписи используются значения параметров k=24 битов и f=96000 измерений/с.выразите в байтах количество информации в студийной музыкальной записи длительностью 1 час 30 мин.

24 бита - это 24/8=3 байта. 96 000 отсчетов дадут 3х96000=288000 байт в секунду 1 час 30 мин - это 90 минут или 90х60=5400 секунд итого получается 288000х5400=1555200000 байт. переводим в мегабайты, для чего делим на 1024², получая примерно  1483 мбайта. ответ: 483 мб на каждый канал записи.

Не вижу и малейшего отношения к программированию. что именно вы хотите видеть в программном коде ?   ответ: алеша, боря, витя.  алеша с кем-то идет к троллейбусу, когда подходит с ним к остановке появляется третий друг, который кричит из окна боре (значит алена шел с борей к троллейбусу). исходя из этого витя ездит на автобусе. боря на троллейбусе (ибо он проводил друга до остановки, значит сам не поехал на троллейбусе, т.к. тогда было бы "вместе" шли или подобное), а значит троллейбус ему не нужен, а нужен трамвай. ответ: витя - автобус боря троллейбус алеша - трамвай.  все. что тут еще программировать, а ? это только  на логику, а не на программирование.. 

Const   n = 3; var   a: array[1..n,1..n] of integer;   minc: array[1..n] of integer;   i,j,min,maxr: integer; begin   randomize;   writeln('исходный массив');   for i : = 1 to n do   begin       min: =100;       for j : = 1 to n do       begin           a[i,j]: =random(21)-10;           write(a[i,j]: 4);           if min> a[i,j] then min: =a[i,j]       end;       writeln;       minc[i]: =min   end;   maxr: =-100;   write('минимальные элементы построчно: ');   for i: =1 to n do   begin if maxr< minc[i] then maxr: =minc[i]; write(minc[i]: 4) end;   writeln;   writeln('максимальный среди минимальных: ',maxr) end. тестовое решение: исходный массив   10  -3    6   -2    6    4     0    8 -10 минимальные элементы построчно:     -3  -2 -10 максимальный среди минимальных: -2