Задача о стеках |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Задача о стеках |
Murderer |
Сообщение
#1
|
Новичок Группа: Пользователи Сообщений: 14 Пол: Мужской Реальное имя: Арслан Репутация: 0 |
Даны три стека, наполненные натуральными числами и четвертый стек пустой. В четвертый стек поместить три числа, являющиеся максимальными числами в первом, втором и третьем стеке. В четвертом стеке числа расположить в порядке неубывания, а в первых трех стеках порядок расположения оставшихся чисел оставить прежним.
Т.е. я понимаю так: через пробел в программе вводится числа в первый стек и нуль завершает ввод, потом второй и соответственно третий стек. Затем программа выводит три максимальных числа из каждого стека в порядке неубывания. Уже которую неделю парюсь и все безуспешно... Ну не могу понять я эти стеки. |
volvo |
Сообщение
#2
|
Гость |
В той программе, которую я тебе привел, в стек заносятся случайные числа, причем их количество тоже случайно... Если хочешь вводить самостоятельно -
for i := 1 to 3 do begin замени на for i := 1 to 3 do beginи опиши еще переменные k, X рядом с i, j ... А чтобы увидеть результаты выполнения программы, перед последним End. добавь ReadLn ... |
Murderer |
Сообщение
#3
|
Новичок Группа: Пользователи Сообщений: 14 Пол: Мужской Реальное имя: Арслан Репутация: 0 |
|
Текстовая версия | 17.05.2024 0:14 |