Составьте таблицу истинности для следующего логического выражения (av b) л с(над буквой с сверху палочка должна быть)

Размер цифрового моноаудиофайла измеряется по формуле:     A = D*T*i,

где D – частота дискретизации (Гц), T – время звучания или записи звука(сек), i - глубина кодирования(байт)

т.к. у нас стерео файл, то он будет занимать в 2 раза больше места при тойже продолжительности(т.к. в нем хранится 2 монодорожки)

16 бит = 2 байта

А = 44000 * 300 * 2 = 26400000 байт = 25781,25 килобайт =  25,177 мегабайт

это для монофайла

а для стерео в 2 раза больше

52800000 байт = 51562,5 килобайт = 50,354 мегабайт

const

  n = 20;

var

  a:array[1..n] of integer;

  i, k:integer;

begin

  randomize;

  writeln('Исходный массив: ');

  for i := 1 to n do

  begin

    a[i] := random(51);

    write(a[i], ' ');

  end; 

  writeln;

  write('k = '); readln(k);

  if (k > n) or (k  < 1) then

  begin

    writeln('элемента с таким индексом нет');

    readln;

    Exit;

  end;

  for i := k to n - 1 do

    a[i] := a[i + 1];

  a[n] := 0;

  writeln('Измененный массив:');

  for i := 1 to n - 1 do

    write(a[i], ' ');

  readln;

  writeln;

end.