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

Втрехзначном числе, все цифры которого нечетны, зачеркнули вторую цифру слева. оказалось, что полученное двузначное число является делителем исходного числа. найти все такие трехзначные числа. сделайте на паскале абс.

Показать ответ
Ответ:
Совершенная14
Совершенная14
11.08.2020 15:00

begin

   for var i := 100 to 999 do if odd(i div 100) and odd(i mod 10) and odd((i div 10) mod 10) then if i mod (10*(i div 100)+(i mod 10)) = 0 then write(i, '  ');

end.

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