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

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

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 12.05.2009, 20:12   #1
worshewitin
Пользователь
 
Регистрация: 25.04.2009
Сообщений: 11
По умолчанию "сортировка" при этом нужно нужно определить время рассортировки

Помогите решить ,горю, до завтра нужно сдать контрольную
произвольную последовательность целых чисел надо рассортировать по убыванию значений.
ввод цифр обсолютно случайные вводить их не надо. вводятся в memo1 с помощью кнопки Button1 "ввод в memo".
Pассортировываются в ListBox1 с помощью кнопки вывод в ListBox.
B ListBox2 с помошью кнопки Button3 "сортировка"
при этом нужно нужно определить время рассортировки,
Bремя начала выполнения каждой из операции поместить в edit2 edit4.
а время окончания операций в edit3 edit5.
У М О Л Я Ю!!!!!!
кто чем может.
worshewitin вне форума Ответить с цитированием
Старый 12.05.2009, 20:21   #2
Utkin
Старожил
 
Аватар для Utkin
 
Регистрация: 04.02.2009
Сообщений: 17,351
По умолчанию

Правило для всех студентов: указывайте язык программирования. Из поста я предполагаю Делфи.
Второе правило: четко формулируйте вопрос.
Случайные числа генерируются функцией Random
Добавить в мемо memo1.Add('строка'); - т.е. чтобы поместить туда число необходимо его привести к строке функцией IntToStr
Насчет сортировки я бы схитрил. Перед вводом в мемо, я бы генерировал числа в массив, откуда их закинул в мемо, затем отсортировал и вывел уже в ЛистБокс.
Маньяк-самоучка
Utkin появился в результате деления на нуль.
Осторожно! Альтернативная логика
Utkin вне форума Ответить с цитированием
Старый 12.05.2009, 20:38   #3
worshewitin
Пользователь
 
Регистрация: 25.04.2009
Сообщений: 11
По умолчанию

т.е. шаг первый
procedure TForm1.BitBtnClick (Sender:TObject);
Begin
memo1.random
а вот дальше чё то туго
worshewitin вне форума Ответить с цитированием
Старый 12.05.2009, 20:42   #4
worshewitin
Пользователь
 
Регистрация: 25.04.2009
Сообщений: 11
По умолчанию

т.е. шаг первый
procedure TForm1.BitBtnClick (Sender:TObject);
Begin
memo1.random

а вот дальше чё то туго
worshewitin вне форума Ответить с цитированием
Старый 12.05.2009, 20:42   #5
Utkin
Старожил
 
Аватар для Utkin
 
Регистрация: 04.02.2009
Сообщений: 17,351
По умолчанию

Random самостоятельная функция. Набери в гугле и получишь полную справку по ней (укажи только, что тебе надо Делфи).

1. Ты организуешь цикл
2. В нем генерируешь число
3. В нем же это число преобразовываешь в строку и запихиваешь в мемо

Но лучше числа сначала засунуть в массив - сортировка чисел происходит быстрее чем сортировка строк, а время имеет смысл в твоей задаче.
Маньяк-самоучка
Utkin появился в результате деления на нуль.
Осторожно! Альтернативная логика
Utkin вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
при нажатии на цифру 1 нужно создать файл по адресу 5avlyha Паскаль, Turbo Pascal, PascalABC.NET 5 07.04.2009 16:21
Нужно в edit1 вывести время! zotox Помощь студентам 1 11.12.2008 10:24
При вводе значения в ячейку нужно изменить ее размер skobarka Microsoft Office Excel 2 26.09.2008 16:35