Объем свободной памяти на диске 0, 01 гбайт, разрядность звуковой платы 16. какова будет длительность звучания цифрового фудиофайла, если его запись с частотой дискретизации 44 100 гц. . если можно

формула нахождения объема закодированного звука

a=d*i*t, где d- частота дискретизации, i - глубина бит (разрядность), t - время.

отсюда выражаем t

t=a/d*i

 

си:

0,01 гбайт=10737418,24 байт

16 бит=2 байта

 

подставляем значения

t=10737418,24/44100*2

t~121,7 сек

Var   a: array [1..7] of system.tuple< boolean, string> ;   i: byte;     begin   a[1] : = new system.tuple< boolean,string> (true, 'понедельник');   a[2] : = new system.tuple< boolean,string> (true, 'вторник');   a[3] : = new system.tuple< boolean,string> (true, 'среда');   a[4] : = new system.tuple< boolean,string> (true, 'четверг');   a[5] : = new system.tuple< boolean,string> (true, 'пятница');   a[6] : = new system.tuple< boolean,string> (false, 'суббота');   a[7] : = new system.tuple< boolean,string> (false, 'воскресение');   readln(i);   writeln((i in [1..7] ?   string.format('day #{0} is {1}. it is {2}.', i, a[i].item2,             (a[i].item1 ? 'working day' : 'weekend')) : 'there aren`t this day.')); end.

Var month: integer; begin readln(month); if ((month > 0 ) and ( month < 13)) then case month of 1 : writeln ('january (31 days) '); 2 : writeln ('fabruary (28 days) '); 3 : writeln ('march (31 days)'); 4 : writeln ('april (31 days) '); 5 : writeln ('fabruary (28 days)'); 6 : writeln ('march (31 days)'); 7 : writeln ('january (31 days) '); 8 : writeln ('fabruary (28 days) '); 9 : writeln ('march (31 days)'); 10 : writeln ('january (31 days) '); 11 : writeln ('fabruary (28 days) '); 12: writeln ('march (31 days)'); end else writeln('error'); readln; end.