|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
28.01.2011, 12:06 | #1 |
Пользователь
Регистрация: 27.12.2010
Сообщений: 26
|
Код программы на Delphi...
Помогите подкорректировать код...Написал программу на Delphi..
Суть её:Дано натуральное число,отсортировать цифры этого числа по возрастанию и убыванию. По возрастанию работает, по убыванию - нет..просмотрите пожалуйста код и исправьте..или напишите свой вариант решения задачи. Код:
Последний раз редактировалось _FENDER_; 28.01.2011 в 12:07. Причина: Ошибся |
28.01.2011, 12:11 | #2 |
А может и не...
Участник клуба
Регистрация: 27.03.2010
Сообщений: 1,269
|
Отсортировал цифры числа в порядке возрастания - хорошо. Перепиши их теперь в обратном порядке - вот тебе сортировка по убыванию.... А в принципе это та же самая сортировка, но с противоположным знаком сравнения...
Перемешивай дело с бездельем и не сойдешь с ума...
|
28.01.2011, 12:17 | #3 |
!=
Участник клуба
Регистрация: 08.09.2008
Сообщений: 1,751
|
я вчера не смог ответить быстро, получилось только часа через 3, правда тему удалил, чтоб тему не удаляли нужно писать название которое соответствует задаче
вот что вчера наклепал Код:
PS со строкой легче было бы, ну по крайней мере читабельнее. Последний раз редактировалось vovk; 28.01.2011 в 12:19. |
28.01.2011, 12:47 | #4 |
Пользователь
Регистрация: 27.12.2010
Сообщений: 26
|
Спасибо..разобрался во всем..программа работает...
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Код программы | Gamst | Помощь студентам | 1 | 25.05.2010 16:26 |
Код программы | Gamst | Общие вопросы Delphi | 7 | 25.05.2010 14:58 |
Код программы | sss-777 | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 10 | 14.05.2010 12:12 |
перевести не трудный код программы из Delphi на С++ | Ilius | Помощь студентам | 2 | 16.12.2008 18:11 |