Мадем,,программа если щитается пульт но думаю нет..
//Pascal
const
n = 5;
m = 5;
var
i, j, k: integer;
a: array [1 .. n, 1 .. m] of integer;
begin
for i := 1 to 5 do
begin
for j := 1 to 5 do
begin
A[i, j] := j;
write(A[i, j]:3);
end;
writeln;
end;
readln;
end.
Конкретно напиши правильно
Var n,i,p:integer;
begin
p:=1;
readln(n);
for i:=1 to n do
if i mod 2 = 0 then k:=k*i;
writeln(k);
end.
В первом скорее всего, если звук моно, то по формуле A=dTI, где А размер файла, d частота дискретизации (насколько я помню, худшее это 8 кГц) Т время звучания, I глубина звука (8 бит худшее вроде бы) можно вычислить.
Во втором подставляешь I и как 8 бит, и как 16, получаешь 2 ответа.