Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 5 390

/ вопрос открыт /

Здравствуйте!
Очень надо написать программу для сортировки двумерного массива, зачёт горит, разбираться некогда...
Зарание спасибо

MaksKharovsk Вопрос ожидает решения (принимаются ответы, доступен мини-форум)

Вопрос задал: MaksKharovsk (статус: Посетитель)
Вопрос отправлен: 8 июня 2011, 18:46
Состояние вопроса: открыт, ответов: 0.


Мини-форум вопроса

Всего сообщений: 25; последнее сообщение — 10 июня 2011, 13:04; участников в обсуждении: 7.

Страницы: [1] [2] [Следующая »]

min@y™

min@y™ (статус: Доктор наук), 8 июня 2011, 20:02 [#1]:

И по какому принципу массив должен быть отсортирован?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
MaksKharovsk

MaksKharovsk (статус: Посетитель), 8 июня 2011, 20:32 [#2]:

пузырьковый метод
Егор

Егор (статус: 10-ый класс), 8 июня 2011, 20:47 [#3]:

двумерный массив? его как отсортировать? по столбцам/строкам/как линейную последовательность/ещё как-то?
Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.
— Donald E. Knuth.
MaksKharovsk

MaksKharovsk (статус: Посетитель), 8 июня 2011, 20:51 [#4]:

можно и столбцами
min@y™

min@y™ (статус: Доктор наук), 8 июня 2011, 21:08 [#5]:

Зачёт, говоришь? Я, вот, вспоминаю, как диплом защищал... :)

4.06.01 пришёл ко мне Абрам. С дискетой. И говорит: "тут мои чертежи, не могу распечатать, везде очереди, штопипец, и цены лепят такие, что кредит надо брать!".

А я, как раз, был дипломником на том самом заводе, где и по сей день работаю. И там был принтер (не плоттер!) формата А1 (HP DeskJet 500, цветной!); Абрам об этом знал, поэтому приехал и привёз свою проблему именно ко мне. Хороший мальчик.

Ну как послать на[censored] дружбана, которого 5 лет знаешь и с которым не один фунт соли вотки сожрали? Правильно - никак. Если ты, конечно, не последнее чмо и гандон. Но я об этом тогда и не думал: надо было дружбана выручать.

Пришлось переться на завод (3 минуты ходьбы - и то спасибо). Жара, лето, конец рабочего дня. Иваныч (хозяин принтера, отличный мужик, до сих пор в одной бригаде трудимся) врубился в ситуёвину сразу и без вопросов напечатал все 10 ватманов за полчаса. Я предлагал ему коньяк от Абрама, но он гордо отказался.

Что было потом, я помню плохо. Помню, что ходил в 1-й отдел и оформлял вынос этих чертежей, потом помню, что Абрам купил 0,7 и закуски... Помню, как пришли ко мне домой...

Жара +30°С, полный штиль, вечер и полное отсутствие кондиционера. Мы сидим и пьём вотку. Запиваем пивом. Заедаем зелёным луком, который растёт у меня на балконе. Потом Абрамчик бегал в магаз... То, что он принёс, мы с ним выпили полностью, но, вот, что - большая загадка, ибо все мои природные терабайты нейронов были жёстко отформатированы. Терабайты Абрамчика - тоже. Восстановить не удалось.

А утром - защита диплома!..

Проснулся я примерно в 9:30. За окном лето, солнышко светит, красота! Башка трещит, каждое движение, шаг, чих, вздох, пук - удар совковой лопатой по лбу. Жена сопит у стенки... Я встаю с кровати и иду поссать, а потом на кухню. Открываю холодильник и, о чудо (!), сразу 2 бутылки холодного пива! Обожаю наше простецкое рязанское "Жигулёвское", оно по утрам творит чудеса - приводит наш город в положение "ВКЛ". Беру одну бутылку, открываю и иду на балкон. Организм всасывает живительную влагу секунд за 5. Закуриваю. Начинает казаться, что жизнь налаживается. Однако, где-то глубоко в душе начинает расти какое-то неприятное чувство. Что-то не так. Начинаю вспоминать вчерашний день, закуриваю вторую сигарету...

Так... Абрам, завод, чертежи, вотка... Чертежи? Диплом?! [censored] [censored] [censored] [censored] [censored] [censored] [censored] [censored] [censored] [censored] [censored] [censored] [censored] в рот! У меня ж сегодня защита диплома!!! Смотрю на часы - уже час, как она (защита) идёт...

Дальше у меня были мысли, которые даже на русский язык перевести невозможно.

Бужу жену, заставляю гладить свой прикид, дрожащими руками завязываю галстук, вытаскиваю из-за тумбочки пакет, в котором лежит томик дипломного проекта и рулон чертежей и валю в сторону альма-матер.

Хорошо, что моя защита - последняя за этот день.
Хорошо, что до универа 7 минут пешком.
Хорошо, что вторую бутылку пива я сунул аккурат в рулон чертежей, торчащий из пакета.

Пока дошёл, протрезвел. Адреналин мои, хоть и бухие, надпочечники вырабатывали в количестве, сравнимом с количеством говна, которое сливается в Оку нашим городом в сутки. Встретил у "шайбы" первых защитившихся. Успокоили. Выпил припасённую бутылку. Алкоголь растворился в адреналине полностью, не создав никакого эффекта. Пока перечитывал "речь", скурил пол-пачки... Ощущения - как перед казнью, колбасит. Реально страшно.

Одногруппники подбадривают: "Не ссы, 7 минут позора, и ты инженер". Улыбаюсь, но не помогает.

В 13:13 захожу на кафедру, дружбаны помогают развесить мои ватманы на раме. Всё, перекур и в бой!

Захожу. Восемь преподов, включая завкафа, пялятся на меня. С меня льётся пот, я волнуюсь. "Здравствуйте, уважаемые члены экзаменационной комиссии!" - это всё, что я вспомнил из текста речи. Сделал паузу (без твикса), успокоился... А потом просто и по-человечески рассказал всё простым человеческим языком, показал демо на компе, объяснил, что изображено на плакатах, и ответил на все вопросы. С каждой секундой я думал и говорил всё уверенней, а под конец даже стал спорить с вопрошающими.

Потом кто-то сказал "спасибо, достаточно", всех завели в кабинет и объявили оценки. Думаю, что свои 5 баллов я заслужил.

А Абрам защищался на следующий день... Получил 4 балла.

З.Ы. Писал только что (среда, 8 июня 2011 года, 20:57), по памяти. Приврал на 0%. Выпуск кафедры САПР ВС, специальность КЭВА, Рязань, РГРТА, 5 июня 2001 года. min@y™.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
MaksKharovsk

MaksKharovsk (статус: Посетитель), 8 июня 2011, 21:16 [#6]:

Память у тебя я скажу)))
min@y™

min@y™ (статус: Доктор наук), 8 июня 2011, 21:17 [#7]:

Цитата (MaksKharovsk):

Память у тебя я скажу)))

Такое хрен забудешь.
Сорри за оффтоп.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
IlluminatI

IlluminatI (статус: 2-ой класс), 8 июня 2011, 21:21 [#8]:

Жжошь :)
Что за специльность?
min@y™

min@y™ (статус: Доктор наук), 8 июня 2011, 21:25 [#9]:

Цитата (IlluminatI):

Что за специльность?

КЭВА (2205) - конструирование электронно-вычислительной аппаратуры.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
min@y™

min@y™ (статус: Доктор наук), 8 июня 2011, 21:36 [#10]:

Цитата (MaksKharovsk):

можно и столбцами

Это как понимать-то?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
MaksKharovsk

MaksKharovsk (статус: Посетитель), 8 июня 2011, 21:48 [#11]:

ну скажем массив1 2 3 4 5 6 7 89 10........ 8 столбцов 8 строк
по столбцам сверху вниз и снизу вверх, по строкам слева направо и наоборот
препод толком не обьяснил ничего, от ответов уходит, так что приходиться и задание, грубо говоря, самому придумывать
он только че сказал, так то что массив сортировать
min@y™

min@y™ (статус: Доктор наук), 8 июня 2011, 21:53 [#12]:

Цитата (MaksKharovsk):

ну скажем массив1 2 3 4 5 6 7 89 10........ 8 столбцов 8 строк по столбцам сверху вниз и снизу вверх, по строкам слева направо и наоборот

Эээээ, [censored], однако, ё, да... Это задача для Высшего разума.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
MaksKharovsk

MaksKharovsk (статус: Посетитель), 8 июня 2011, 21:57 [#13]:

ну может подругому как нибудь, говорю же препод не обьяснил толком ничего, а я массивы вообще не трогал...токо токо вникать начал.
min@y™

min@y™ (статус: Доктор наук), 8 июня 2011, 22:01 [#14]:

Ты врубись - сортировать одномерный массив - это либо по убыванию, либо по возрастанию. А как сортировать матрицу - препод должен был объяснить, ибо способов - туева хуча. Сходи спроси.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
Мережников Андрей

Мережников Андрей (статус: Абитуриент), 8 июня 2011, 22:03 [#15]:

Цитата (MaksKharovsk):

по столбцам сверху вниз и снизу вверх, по строкам слева направо и наоборот

так как все-таки сортировать? Если по приведенному выше принципу, то программа сводится к одной строке, выглядящей примерно так: showmessage('массив отсортирован')
MaksKharovsk

MaksKharovsk (статус: Посетитель), 8 июня 2011, 22:03 [#16]:

единственное что сказал, пузырьковым методом, лады завтра спрошу конкретней
MaksKharovsk

MaksKharovsk (статус: Посетитель), 8 июня 2011, 22:04 [#17]:

спс
Мережников Андрей

Мережников Андрей (статус: Абитуриент), 8 июня 2011, 22:06 [#18]:

Цитата (min@y™):

Сходи спроси.

смешно :-) спрашивать надо было раньше, а не тогда, когда зачет загорелся
min@y™

min@y™ (статус: Доктор наук), 8 июня 2011, 22:21 [#19]:

Цитата (Мережников Андрей):

смешно

Ну, 1хрен, телепатов тут нету. Никто ж не угадает, что потребовал сделать препод.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
bugmenot

bugmenot (статус: 3-ий класс), 8 июня 2011, 23:16 [#20]:

В армию надо сходить :­-­D
виконання програми розпочинається з того самого мiсця, де призупинилося.

9 июня 2011, 08:52: Вопрос перемещён из тематического раздела Delphi » Прочее в раздел Лабораторный практикум » Delphi модератором Ерёмин А.А.

Страницы: [1] [2] [Следующая »]

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 22 февраля 2025, 11:26
Выполнено за 0.03 сек.