program asd;
uses crt;
var
a,b,c:integer;
begin
writeln('Введите 3 числа');
readln(a); readln(b); readln(c);
if (a<b) and (a<c) then
begin
writeln('Минимальное ', a);
end
else
begin
if (b<c) then writeln('Минимальное ', b)
else writeln('Минимальное ', c);
end;
end.
Ну тут всё надо перемножить и перевести в кБ.
30 с * 16000 Гц * 16 бит = 7 680 000 бит ( сек * 1/сек * бит = бит)
7 680 000 / 8 = 960 000 Байт (1 Байт = 8 бит)
960 000 / 1024 = 937,5 кБайт (1 кБайт = 1024 Байт, т.е. 2 в степени 10)
<span>
</span>
1.
sec = int(input())
min = sec // 60
sec = sec - min*60
print(min," мин ",sec," сек.")
2.
x = int(input())
a = x //1000
b = x//100 - a*10
c = x//10 - a*100 - b*10
d = x - a*1000 - b*100 - c*10
print("сумма:"a+b+c+d)
print("произведение:"a*b*c*d)
3.
x = int(input())
b = x//100
c = x//10 - b*10
d = x - b*100 - c*10
y = d*100 + c*10 + b
Утверждение, которому всегда можно поставить в соответствие одно из двух логических значений. Логическое высказывание принято обозначать заглавными латинскими буквами.