|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
19.04.2010, 17:14 | #1 |
Новичок
Джуниор
Регистрация: 19.04.2010
Сообщений: 2
|
модуль, процедура, переменные
доброго времени суток, создаю модуль для сортировки массивов, и запнулся фактически в самом начале. а именно
в модуль будет передаваться массив и количество элементов массива примерно так: interface type massiv=array[1..n] of real; procedure bubls(var: a:massiv;n:integer); загвоздка вот в чем не могу как объявить кол-во элементов в массиве. ведь количество элементов массива всегда будет разным при включении модуля. как лучше сделать? приведите пример или ссылку на исходники похожей задачи, пожалуйста. Последний раз редактировалось Anserone; 19.04.2010 в 17:17. Причина: в текст влез смайлик |
20.04.2010, 14:43 | #2 |
Форумчанин
Регистрация: 07.04.2009
Сообщений: 245
|
Объявляй процедуры своего модуля по следующему образцу:
Код:
Всякое безобразие должно быть единообразным. Тогда это называется порядком.
|
20.04.2010, 15:17 | #3 |
А может и не...
Участник клуба
Регистрация: 27.03.2010
Сообщений: 1,269
|
Можно это решить несколько проще... ТурПас поддерживает открытые массивы. Этот массив представляет собой формальный параметр подпрограммы, описывающий базовый тип элементов массива, но не определяющий его размерности и границы.
Procedure Sort(OpenArray:array of integer); В подпрограмме этот параметр будет трактоваться как одномерный массив с нулевой нижней границей, а верхняя граница массива может быть определена с использованием функции HIGH. Пример выглядит так Код:
Перемешивай дело с бездельем и не сойдешь с ума...
|
20.04.2010, 22:36 | #4 |
Новичок
Джуниор
Регистрация: 19.04.2010
Сообщений: 2
|
огромное спасибо=)
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
like, переменные | radik-com | Microsoft Office Excel | 2 | 07.02.2010 22:23 |
Переменные | Hehe | Общие вопросы Delphi | 4 | 11.12.2009 13:40 |
переменные | Артэс | Общие вопросы C/C++ | 11 | 23.06.2009 12:12 |
Процедура в процедура в C++ Builder | Ecosasha | C++ Builder | 2 | 06.06.2009 17:17 |