Формула
(*2, если стерео), где V - объём (бит), D - частота (Гц), i - глубина кодирования (бит/сек), а t - время (сек) :)
1)
байт = 11661312 битов в файле
секунд =)
2)
700 КиБ = 5734400 бит
секунды
----------
6300 КиБ = 51609600 бит
секунд
Тут всё по формуле =)
Таблица истинности для <span>A&BvA.
</span>
Var
x,max:real;
n,i:integer;
begin
write('Введите число n: ');
readln(n);
for i:=1 to n do
begin
write('Введите число ',i,': ');
readln(x);
if x<0 then
begin
if max=0 then max:=x; // если это первое отр.число
if x>max then max:=x
end
end;
writeln('Наибольшее среди отрицательных: ',max)
<span>end.</span>
Клавишу Shift - если я не ошибаюсь