IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

 
 Ответить  Открыть новую тему 
> Стек и указатели....
сообщение
Сообщение #1





Группа: Пользователи
Сообщений: 4
Пол: Мужской

Репутация: -  0  +


Помогите, плиз!!!
Совсем запутался в этих укзателях...
Препод послезавтра уходит в отпуск и прощай зачёт!!!
Задача звучит так: Ввести стек значений, найти минимальное и максимальное и поменять их местами.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Гость






Стек НЕ предназначен для поиска в нем элементов !!! Над стеком выполняются только 3 операции: Push(занести элемент в стек), Pop(извлечь элемент из стека) и Top(скопировать значение с верхушки стека без извлечения)... Сможешь с помощью этих операций найти минимальное и максимальное значение и еще поменять их местами? Сомневаюсь...

Так что придется уточнить, стек или все-таки список...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3





Группа: Пользователи
Сообщений: 4
Пол: Мужской

Репутация: -  0  +


Таки да.
Наверное список...
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Гость






FAQ: Списки
Здесь есть модуль для работы со списками, оттуда можешь взять описание и заполнение списка. Вот тебе пример, как найти минимальный элемент:
Function FindMin(head: point): point;
Var min: Integer;
begin
FindMin := nil; min := maxInt;
While head <> nil Do Begin
If head^.number < min Then Begin
min := head^.number; FindMin := head
End;
head := head^.next
End;
end;

Результат работы этой функции - указатель на минимальный элемент в списке. По аналогии ищешь указатель на максимальный элемент и меняешь их местами.
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5





Группа: Пользователи
Сообщений: 4
Пол: Мужской

Репутация: -  0  +


А что такое maxInt?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #6


Гость






F1 нажми и узнаешь...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #7





Группа: Пользователи
Сообщений: 4
Пол: Мужской

Репутация: -  0  +


ОКsmile.gif
Спасибо!
Выручил! :D
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #8


-
****

Группа: Пользователи
Сообщений: 480
Пол: Мужской

Репутация: -  4  +


Стек тоже массив :D


--------------------
бб
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #9


Гость






Цитата(FreeMan @ 2.07.05 13:12)
Стек тоже массив :D

То, что он реализован на массиве (у некоторых ;) ) еще не значит, что он и есть массив... В любом случае, задание - не на массивы, а на указатели... Наверное, мою фразу из 2-го поста лучше переформулировать так:
Цитата
Над стеком должны выполняться только 3 операции:
, далее - по тексту
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 29.03.2024 16:27
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name