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

Даны два целых числа A и В, A>B. Выведите все нечётные числа от A до B включительно, в порядке убывания. python. решить задачу с использованием if и без использования циклов for,range.

Показать ответ
Ответ:
lesnyxalex
lesnyxalex
01.05.2022 02:10

1} 136 - не может получиться (если это 13 и 6, то первая сумма больше второй; а если это 1 и 36, то 36 нельзя получить как сумму 2-х цифр)

2} 712 - может получиться (например для числа 257)

3} 215 - не может получиться (если это 21 и 5, то первая сумма больше второй; если это 2 и 15, значит средняя цифра должна быть <=2, но тогда нельзя получить 15 как сумму средней и младшей цифр)

4} 10  - не может получиться (первая сумма больше второй)

5} 621 - не может получиться (21 нельзя получить как сумму 2-х цифр)

6} 619 - не может получиться (19 нельзя  получить как сумму 2-х цифр)

ответ: 1

0,0(0 оценок)
Ответ:
anat1
anat1
30.05.2023 03:44
PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018Внимание! Если программа не работает, обновите версию!

begin

 var c := ReadlnString;

 if c.Any(t -> not (t in ['0'..'9'])) then

 begin

   Print('Ошибка ввода');

   exit

 end;

 var a := c.Select(t -> t.ToDigit).ToArray;

 Writeln('a) ', c.Where(t -> t = '9').Count);

 Writeln('б) ', a.Where(t -> t = a[0]).Count);

 Writeln('в) ', a.Where(t -> t.IsOdd).Count);

 Writeln('г) ', a.Where(t -> t < 3).Sum);

 Writeln('д) ', a.Where(t -> t.IsEven and (t > 4))

     .Aggregate(1, (p, q)-> p * q));

 Writeln('е) ', a.Where(t -> (t = 2) or (t = 3)).Count);

end.

Пример1764963253120a) 1б) 2в) 7г) 6д) 36е) 4Примечание: количество цифр в числе практически не ограничено, контроль на ввод "не-цифр" имеется.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота