По каналу связи передаются сообщения, содержащие только семь букв: Б, О, Н, И, М, Т, Р, Я, Г. Для передачи используется двоичный код, удовлетворяющий условию Фано. Кодовые слова для некоторых букв известны: О — 010, М — 011, Р — 100. Какое наименьшее количество двоичных знаков потребуется для кодирования слова МОНИТОР? Примечание. Условие Фано означает, что ни одно кодовое слово не является началом другого кодового слова.
var
a,b,m,d:integer;
begin
Write('Введите размеры форточки (а,b) в см: ');
Read(a,b);
Write('Введите диаметр головы Васи в см: ');
Read(d);
if a<b then m:=a+2 else m:=b+2;
{ +2 - это зазор по 1 см с обоих сторон }
if d<=m then Writeln('Голова проходит')
else Writeln('Голова не проходит')
end.
Тестовое решение:
Введите размеры форточки (а,b) в см: 25 40
введите диаметр головы Васи в см: 23
Голова проходит
program p453;
var
a,b,c,x,y,m1,m2,n1,n2:integer;
begin
Write('Введите размеры кирпича в см (a,b,c): ');
Read(a,b,c);
Write('Введите размеры отверстия в см (x,y): ');
Read(x,y);
if a<b then
if a<c then begin
m1:=a;
if b<c then m2:=b else m2:=c
end
else begin m1:=c; m2:=a end
else
if b<c then begin
m1:=b;
if a<c then m2:=a else m2:=c
end
else begin m1:=c; m2:=b end;
if x<y then begin n1:=x; n2:=y end
else begin n1:=y; n2:=x end;
if (m1<=n1) and (m2<=n2) then Writeln('Кирпич пройдет в отверстие')
else Writeln('Кирпич не пройдет в отверстие')
end.
Тестовое решение:
Введите размеры кирпича в см (a,b,c): 10 4 12
Введите размеры отверстия в см (x,y): 5 9
Кирпич не пройдет в отверстие
program p454;
var
a,b:integer;
begin
Write('Введите значения а и b: '); Read(a,b);
Writeln('Размеры чемодана ',3*a,'x',2*a,'x',a);
Writeln('Размеры коробки ',3*b,'x',2*b,'x',b);
if b<a then Writeln('Коробка поместится в чемодан')
else Writeln('Коробка не поместится в чемодан')
end.
Тестовое решение:
Введите значения а и b: 18 16
Размеры чемодана 54x36x18
Размеры коробки 48x32x16
Коробка поместится в чемодан
n = int(
lstr = (" ")
ns = []
i = 0
tot = 0
while i < n:
ns.append(int(
tot += int(lstr[i])
i += 1
if tot % 5 == 0 and len(ns) > 4:
sm = int(tot / 5)
ns = sorted(ns, reverse=true)
ps = "yes"
su = 0
sk = 0
b = false
for n in ns:
if n ! = 0 and b:
su == 0
sk += 1
b = false
break
if sk == 5:
ps = "no"
break
su += n
if abs(su) > abs(sm):
ps = "no"
break
if su == sm:
b = true
print(ps)
else:
print("no")
СДЕЛАЙ ОТВЕТ ЛУЧШИМ