IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Задача на большие числа.
Santrex
сообщение 16.02.2005 19:59
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 32
Пол: Мужской

Репутация: -  0  +


Вот тут есть задачка одна в которой я что то не могу понять условия задачи.
Если кто поймет можете написать програмный код к ней.

Напечатать в возрастающем порядке все трехзначные числа, в десятичном записи которых нет одинаковых цифр.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов(1 - 8)
volvo
сообщение 16.02.2005 20:04
Сообщение #2


Гость






Santrex
А в чем проблема с условием? Напечатать трехзначные числа без повторяющихся цифр... Что может быть здесь непонятно? Начало последовательности должно быть таким:
Цитата
102, 103, 104, 105, ...

Потому что в 100 повторяется ноль, а в 101 - единица... Теперь понятнее?
 К началу страницы 
+ Ответить 
Altair
сообщение 16.02.2005 20:08
Сообщение #3


Ищущий истину
******

Группа: Модераторы
Сообщений: 4 824
Пол: Мужской
Реальное имя: Олег

Репутация: -  45  +


а что не понятно?

это такие трехзначные числа, начиная с 102 где нет одинаковых цифр.
ТО есть число 100 (первое трехзначное ) не подходит, т.к. два нуля...
101 - две единицы...
Простейшее решение: перебор всех чисел от 102 до 987 , причем выводить только те, у которых цифры все разные...

volvo :D :P в одно время писали smile.gif


--------------------
Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Santrex
сообщение 16.02.2005 20:19
Сообщение #4


Новичок
*

Группа: Пользователи
Сообщений: 32
Пол: Мужской

Репутация: -  0  +


Спасибо что объяснили.Жаль что кода не прилогаеться smile.gif
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Altair
сообщение 16.02.2005 20:22
Сообщение #5


Ищущий истину
******

Группа: Модераторы
Сообщений: 4 824
Пол: Мужской
Реальное имя: Олег

Репутация: -  45  +


а что в коде может быть не понятно?
можно так например:

for i:=102 to 987 do
begin
If цифры не одинаковы then writeln(i);
end;

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


--------------------
Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Santrex
сообщение 19.03.2005 14:37
Сообщение #6


Новичок
*

Группа: Пользователи
Сообщений: 32
Пол: Мужской

Репутация: -  0  +


А как найти что цифры не одинаковы ?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 19.03.2005 14:38
Сообщение #7


Гость






Начать думать наконец !!!
 К началу страницы 
+ Ответить 
Santrex
сообщение 19.03.2005 14:41
Сообщение #8


Новичок
*

Группа: Пользователи
Сообщений: 32
Пол: Мужской

Репутация: -  0  +


Ну я понимаю как сравнить слово с со словом.Ну там число с числом.А как сравнить символ с символом в числе я понять не могу?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 19.03.2005 14:45
Сообщение #9


Гость






Первая цифра трехзначного числа X это: (X div 100)...
Последняя - это: (X mod 10)... Дальше - думайте ...
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 20.07.2025 2:49
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"