Объем файла : С=t*b*N, где С- Объем звукозаписи в байтах, t - время в сек., b- разрядность в байтах, N - частота дискретизации в Гц или 1/сек.
С= 60*(16/8)*44000 = 5280000 байт = 5156 КБайт = 5,03 Мбайт
Продолжительность звукозаписи из той же формулы:
t=C/b*N C- Объем диска в байтах. b- разрядность в байтах, t- время в сек.
t=(700*1024*1024)/(16/8)*44000= 8340,94 сек = 139 мин.
Вроде так. дальше протяжку сделайте и все
Переводим размер в дюймы. 1 дюйм возмем примерно за 2.5 см.
Тогда
10/2.5=4
15/2.5=6
Если в каждом дюйме 600 пикселей, то:
4*600=2400
6*600=3600
Изображение в пикселях: 2400*3600=8640000 пикселей.
На каждый пиксель по 3 байта и того у нас 25920000 (байт) = 24,72 (мегабайт)
Const nx=20;var i,j,n:integer; D:array[1..nx,1..nx] of integer;pG,pP:double;m:boolean;begin
write('Введите размер массива n');Readln(n);pG:=1;pP:=1;
for i:=1 to n do begin
for j:=1 to n do begin
Readln(D[i,j]);//D[i,j]:= random(35)-15;end;end;writeln;
for i:=1 to n do beginfor j:=1 to n do begin
write(D[i,j]:4);end;writeln;end;writeln;
for i:=1 to n do begin
for j:=1 to n do begin
if i < n-j+1 then begin write(D[i,j]:4); pP:= pP * D[i,j];end else write(' ':4);end;writeln;end;writeln;
for i:=1 to n do begin
for j:=1 to n do begin
if i <j then begin write(D[i,j]:4); pG:= pG * D[i,j];end else
write(' ':4);end;writeln;end;writeln;
writeln('произведение элементов массива над главной диагональю =',pG);writeln('произведение элементов массива над побочной диагональю =',pP);if pG = pP then m:= true
else m:= false;writeln('Высказывание =', m);<span>end.</span>