Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
Прочтите прежде чем задавать вопрос!1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
  |
| Задача на большие числа. |
| Santrex |
Сообщение
#1
|
 Новичок  Группа: Пользователи Сообщений: 32 Пол: Мужской Репутация:  0   |
Вот тут есть задачка одна в которой я что то не могу понять условия задачи.
Если кто поймет можете написать програмный код к ней. Напечатать в возрастающем порядке все трехзначные числа, в десятичном записи которых нет одинаковых цифр. |
   |
 
|
| volvo |
Сообщение
#2
|
|
Гость |
Santrex
А в чем проблема с условием? Напечатать трехзначные числа без повторяющихся цифр... Что может быть здесь непонятно? Начало последовательности должно быть таким: Цитата 102, 103, 104, 105, ... Потому что в 100 повторяется ноль, а в 101 - единица... Теперь понятнее? |
|
|
|
| Altair |
Сообщение
#3
|
 Ищущий истину Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: 45 |
а что не понятно?
это такие трехзначные числа, начиная с 102 где нет одинаковых цифр. ТО есть число 100 (первое трехзначное ) не подходит, т.к. два нуля... 101 - две единицы... Простейшее решение: перебор всех чисел от 102 до 987 , причем выводить только те, у которых цифры все разные... volvo :D :P в одно время писали  -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
| Santrex |
Сообщение
#4
|
|
Новичок Группа: Пользователи Сообщений: 32 Пол: Мужской Репутация: 0 |
Спасибо что объяснили.Жаль что кода не прилогаеться
|
|
|
|
| Altair |
Сообщение
#5
|
|
Ищущий истину Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: 45 |
а что в коде может быть не понятно?
можно так например: for i:=102 to 987 do begin If цифры не одинаковы then writeln(i); end; тебе только добавить проверку на то, что в числе цифры отличаются... -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
| Santrex |
Сообщение
#6
|
|
Новичок Группа: Пользователи Сообщений: 32 Пол: Мужской Репутация: 0 |
А как найти что цифры не одинаковы ?
|
|
|
|
| volvo |
Сообщение
#7
|
|
Гость |
Начать думать наконец !!!
|
|
|
|
| Santrex |
Сообщение
#8
|
|
Новичок Группа: Пользователи Сообщений: 32 Пол: Мужской Репутация: 0 |
Ну я понимаю как сравнить слово с со словом.Ну там число с числом.А как сравнить символ с символом в числе я понять не могу?
|
|
|
|
| volvo |
Сообщение
#9
|
|
Гость |
Первая цифра трехзначного числа X это: (X div 100)...
Последняя - это: (X mod 10)... Дальше - думайте ... |
|
|
|
|
|
Текстовая версия | 15.04.2025 12:58 |
