5 бит.
2 в 5-ой степени = 32
Названия и адреса файлов подгоните сами. Я выделю в коде жирным шрифтом.
uses crt;
var i,o:text;
s:string;
ans:integer;
begin
assign(i,'C:\Pascal\input.txt'); reset(i);
assign(o,'C:\Pascal\output.txt'); rewrite(o);
while eoln(i)<>true do
begin
readln(i,s);
if ((s[2]>s[1]) and (s[3]>s[2]) and (s[4]>s[3])) or ((s[2]<s[1]) and (s[3]<s[2]) and (s[4]<s[3])) then
begin
writeln(o,s);
inc(ans);
end;
end;
writeln(ans);
close(o);
<span>end.</span>
Размер стереозаписи (без сжатия) измеряется по формуле:
A = 2*D*T*i,
Размер цифрового моноаудиофайла измеряется по формуле:
A = D*T*i,
где D – частота дискретизации (Гц), T – время звучания или записи звука, i - разрядность регистра (разрешение).
A1 = 2*D*T*i = 50 Мбайт ⇒ D*T*i = 50/2 = 25 МбайтA2 = (D/5)*T*(3*i) = 3/5 * D*T*i = 3/5 * 25 = 15 Мбайт
Ответ: 15 Мбайт
import math
x = float(input())
y = float(input())
def small(x ,y):
return math.fabs(x) + math.fabs(y) > 2
def big(x, y):
return math.fabs(x) + math.fabs(y) < 4
if small(x, y) and big(x, y):
print("Точка принадлежит области")
else:
print("Точка не принадлежит области")