fox2055
03.05.2022 17:41

Студенты группы, состоящей из 36 человека, изучают и франц. сообщение о том, что произвольно выбранный студент изучает франц. , несет 2 бита информации. сколько человек изучают ? (ответ только в виде числа)

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
kotnapnewme123p04tz4
19.07.2021 16:38

Python

n=int(input())

if n>1 and n<10 or n==1:

   print(1)

elif n>10 and n<100 or n==10 :

   print(2)

elif n>100 and n<1000 or n==100 :

   print(3)

elif n>1000 and n<10000 or n==1000:

   print(4)

elif n>10000 and n<100000 or n==10000:

   print(5)

elif n>100000 and n<1000000 or n==100000:

   print(6)

elif n>1000000 and n<10000000 or n==1000000:

   print(7)

elif n>10000000 and n<100000000 or n==10000000:

   print(8)

elif n>100000000 and n<1000000000 or n==100000000:

   print(9)

elif n>1000000000 and n<10000000000 or n==1000000000:

   print(10)

else:

   print(0)

СДЕЛАЙ ОТВЕТ ЛУЧШИМ!
0,0(0 оценок)
Ответ:
mishanyak19991
23.02.2021 21:04
Рекурсивный подход.(Символы тоже удаляет)
function grad(s:string):string;
var
i:byte;
detect:boolean;
begin
while i < length(s) - 2 do
begin
inc(i);
if (s[i] = s[i+1]) and (s[i] = s[i+2]) then {проверка последовательности из 3 елементов}
begin
delete(s,i,3); {если да - удаляем их}
detect:=True; {логическая переменная регистрирует изменение строки}
end;end;
if detect = True then
s:=grad(s); {если строку изменили , проверяем не появились ли там еще последовальности}
grad:=s; 
end;

var
s:string;
begin
readln(s);
writeln(grad(s));
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота