Var
B,X:real;
Begin
Write('B = ');ReadLn(B);
Write('X = ');ReadLn(X);
Write('Итоговая стоимость = ',X*B*0.8,' руб.')
End.
Молодец! .....................................
var s,k:integer;
Begin
read(k);
s:= k div 100 + k div 10 mod 10 + k mod 10;
writeln(s);
End.
Винчестер
................
Ответ:
Возможно Вы имели в виду 15 секунд записи, а не 15 бит/сек, тогда размер файла будет рассчитываться просто по формуле:
Размер (в битах) = 450000 Гц * 15 сек * 24 бит = 162 млн. бит = 20250000 байт = 19775.390625 кБайт = 19.31190490723 мБайт
Если имеется в виду именно 15 бит/сек, то и вес будет 15 бит за секунду, то есть 15 бит.
Объяснение:
Размер цифрового моноаудиофайла измеряется по формуле: A = D*T*i,
где D – частота дискретизации (Гц), T – время звучания или записи звука, i - разрядность регистра (разрешение).