Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 10.10.2009, 02:03   #11
LeBron
Форумчанин
 
Регистрация: 10.10.2009
Сообщений: 680
По умолчанию

для серьезной задачи баскетсорт рулит, а для 4значного числа - как-то все равно. Если бы было хотя бы 1000 цыфр, строка длинного числа... А так можно конкретно в даном шуточном задании шуточно отметить, что Ваше, Arigato, решение, проигрывает по памяти Ведь у Вас 10 ячеек массива, а при сортировке за квадрат будет только 4 и дополнительная переменная
LeBron вне форума Ответить с цитированием
Старый 10.10.2009, 23:47   #12
illia2009
Пользователь
 
Регистрация: 09.10.2009
Сообщений: 10
По умолчанию

Цитата:
Сообщение от Progs1024 Посмотреть сообщение
Задача состоит в следующем... Дано натуральное четырёхзначное число. Нужно найти минимальное натуральное 4х значное число, состоящее из тех же цифр, что и заданное.
Например. Дано число 5928. Нужно что бы выходило 2589.
Ну ты,.. ты,.. ну ей богу. Маленький что ли?? Выдели 4 цифры числа и методом сравнений сформируй новое. Что так тяжело?? Даже не знаю как тебя назвать, развёл базар в теме, из-за чего?? из-за такой ерундовой задачки?? Ну ты даёшь... Ладно как бы там небыло я сделал для общего случая (не только для 4-х значного числа). Когда будешь смотреть задачу, то вспомни, что натуральные числа--это те числа, которыми мы пользуемся при счёте, то есть от единицы (1) до плюс бесконечности. Я ограничил тип "LongInt" от 0 (нуля) только потому, что мне требовалось пустое число (ноль (0) число не натуральное!!).

http://programskitchen.com/pandcf/wi...p/nvlrvrs0.rar
есть вопросы на которые никто не может дать вразумительного ответа?? обращайтесь:
пишите: "fq@programskitchen.com";
заходите: "http://programskitchen.com".

Последний раз редактировалось illia2009; 11.10.2009 в 21:17.
illia2009 вне форума Ответить с цитированием
Старый 11.10.2009, 11:18   #13
Progs1024
Пользователь
 
Регистрация: 20.09.2009
Сообщений: 33
По умолчанию

ну знаешь, я новичок в паскале... если не нравится что я не могу решить такую простую задачу, то научи меня...
Progs1024 вне форума Ответить с цитированием
Старый 11.10.2009, 11:43   #14
Arigato
Высокая репутация
СуперМодератор
 
Аватар для Arigato
 
Регистрация: 27.07.2008
Сообщений: 15,544
По умолчанию

Цитата:
Сообщение от Progs1024
ну знаешь, я новичок в паскале... если не нравится что я не могу решить такую простую задачу, то научи меня...
Учить вас ни кто не обязан. Если оно вам не нужно, то вы так всю жизнь будите новичком.
Arigato вне форума Ответить с цитированием
Старый 11.10.2009, 21:21   #15
illia2009
Пользователь
 
Регистрация: 09.10.2009
Сообщений: 10
По умолчанию

Цитата:
Сообщение от Progs1024 Посмотреть сообщение
ну знаешь, я новичок в паскале... если не нравится что я не могу решить такую простую задачу, то научи меня...
я так понимаю ты находишься в Россие, а то в Украине, так что извини, но учить могу тебе только дистанционно.
есть вопросы на которые никто не может дать вразумительного ответа?? обращайтесь:
пишите: "fq@programskitchen.com";
заходите: "http://programskitchen.com".
illia2009 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Найти из N чисел минимальное Shevali Помощь студентам 2 31.03.2009 17:23
Определить в тексте слово, содержащее минимальное число согласных stasig Помощь студентам 3 15.02.2009 13:11
Вывести число, предшествующее первому отрицательному и число, следующее за последним отрицательным Rid Паскаль, Turbo Pascal, PascalABC.NET 4 22.12.2008 16:50
Найти и вывести все слова,у котоpых число гласных букв пpевышает число согласных. Briz Помощь студентам 2 11.05.2008 00:56
Ввести число N и определить делится ли оно без остатка на число M (VBA) Ivanich Microsoft Office Excel 7 24.04.2008 19:43