Делить исходное число на 2 (8 или 16) остатки записать в обратной последовательности
в двоичную - 1110,1100111, 10001010, 100101101
в восьмеричную - 16, 147, 212, 455
в шестнадцатеричную - E, 67, 8A, 12D
<span><em>Caps Lock,</em></span><span><em>Shift</em></span>
F =468,75 Кбайт =468,75 *2^13 бит
D = 16 бит =2^4 бит - глубина звука
H =48 КГц =48*1000= 3*2^4 *1000 Гц - частота звука (1/c)
t=F : (D *H)
t =468,75 *2^13 : (2^4 *3 *2^4 *1000) = 468,75 *2^5 :3 :1000=
=156,25*32 :1000 = 5 000 : 1 000=5 (c)
ответ: t =5 секунд
//PascalABC.Net 3.2
{2}
function f(x:real):real;
begin
if x>0 then result:=x/3 else result:=x*sqr(x);
end;
begin
write (f(readreal('x =')));
end.
{3}
begin
var cat:=readinteger('Введите начальное кол-во:');
var count:=0;
if cat<2 then write ('Никогда') else
if cat>100 then write ('Уже не хватает') else begin
repeat
count+=1;
cat+=cat div 2;
until cat>100;
print ('Через', count, 'недели');
end;
end.