A, b, c = map(int, input().split()) #ввод в строчку
if min(a, b, c) > 10 and a%3 == 0 and b%3 == 0:
print("yes")
else:
print("no")
Имеется в виду каждый может сказать но не каждый может сделать
ну буквы Вы не написали, поэому задание полностью выполнить не получится. Но Вы можете сами записать буквы, по представленному адресу: <u>http:\\doc.com\print.doc</u>
Переводим все велечины в первоначальные единицы:
t = 10мин = 600сек
f = 11.025кГц = 11025Гц
b = 8бит = 8бит.
I = t * f * b
I = 600сек * 11025Гц * 8бит = 52920000бит = 6.3мб
Ответ: 6.3мб
<u><em>Текст модуля (Free Pascal):</em></u>
unit MyLib;
interface
procedure MinDigit(n:longint;var md:byte);
implementation
procedure MinDigit(n:longint;var md:byte);
var
d:byte;
begin
md:=10;
while n>0 do begin
d:=n mod 10;
if d<md then md:=d;
n:=n div 10
end
end;
begin
end.
<em><u>Тестовая программа:</u></em>
uses
Crt, MyLib;
var
p:byte;
begin
ClrScr;
MinDigit(45134,p);
Writeln('p=',p);
ReadKey
end.
<em><u>Тестовое решение:</u></em>
p=1