<span>a = (x ^ 2 - x * y)/(0.7 * sin (Log(abs(x))))</span>
<span>Две скобки не хватает.</span>
Формула нахождения объема закодированного звука
A = D * i * t * с (D - частота дискретизации, i - глубина бит/разрядность, t - время, c - кол-во каналов)
Тогда t = A / (D * i * с)
Приводим единицы измерения
D = 64 кГц = 64000 Гц
A = 4026531840 бит
t = A / (D * i * c) = 4026531840 / (64000 * 24 * 2) = 1310.72 секунд = 21.845333333333333 минут
Ответ 20
Var x,k:integer;
<span>begin </span>
<span>k:=0; </span>
<span>repeat </span>
<span>writeln('Введите число'); </span>
<span>read(x); </span>
<span>if (x>0) and (x<=256) then k:=k+1; </span>
<span>until x=0; </span>
<span>writeln('Количество положительных чисел <=256 = ',k); </span>
<span>end.</span>
Богатырь богатырь тигр тигр тигрщ
Var Y: array [1..11] of integer;
var i, sum, n: integer;
begin
randomize;
for i:=1 to 11 do begin
Y[i]:=-10+random (21);
write (Y[i], ' ');
end;
sum:=0;
for i:=1 to 11 do begin
if (i mod 2<>0) and (Y[i]<0) then sum:=Y[i]+sum; //№1
if i mod 2<>0 then Y[i]:=Y[i]*Y[i]; //№2
if (i mod 2=0) and (Y[i]=1) then inc (n); //№3
end;
writeln;
writeln ('Сумма =', sum);
writeln ('Количество 1 на четных местах =', n);
<span>end.
</span>