В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
VikaGrin1
VikaGrin1
16.06.2022 10:13 •  Информатика

Перевести числа из десятичной системы числение в твоичную систему счисление: б) 7260​

Показать ответ
Ответ:
banana1106
banana1106
19.01.2022 00:50

user_inputs = int(input('Введите месяц: '))

months = {

  1: 'январь',

  2: 'февраль',

  3: 'март',

  4: 'апрель',

  5: 'май',

  6: 'июнь',

  7: 'июль',

  8: 'август',

  9: 'сентябрь',

  10: 'октябрь',

  11: 'ноябрь',

  12: 'декабрь'

}

print(months.get(user_inputs))

age = int(input('Введите возраст: '))

if age > 80:

  print('Долгожители')

elif age <= 80 and age >= 56:

  print('Пожилые')

elif age <= 55 and age >= 30:

  print('Зрелые')

elif age <= 30 and age >= 17:

  print('Молодежь')

elif age <= 17 and age >= 7:

  print('Отрочество')

elif age <= 7 and age >= 3:

  print('Дошкольный период')

elif age <= 3 and age >= 1:

  print('Дошкольный период')

else:

  print('Error')

Объяснение:

Во втором задании ошибка. Дошкольный возрост не от 0 до 7 (т.к это бред условие не будет работать если одинаковые возрасты и для ясельного и для школьного) а с 3 до 7.

0,0(0 оценок)
Ответ:
alexanikulina2
alexanikulina2
08.03.2022 20:12
1)
Var
n,m,max,min:integer;
Begin
write('Введите число: ');
readln(n);
min:=9;   
max:=0;
while n>0 do 
begin 
m:=n mod 10; 
if m<min then min:=m; 
if m>max then max:=m; 
n:=n div 10; end;   
writeln('Максимальное число: ',max);   
writeln('Минимальное число: ',min);
End.
2)
var
i,count: integer;
n,s:string;
begin
writeln('Введите число: ');
readln(s);
writeln('Введите цифру: ');
readln(n);
for i:=1 to length(s) do
if(s[i]=n)then
count:=count+1;
writeln('Количество раз, когда встречается цифра = ',count);
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота