переделывали в инсте стэк, но я забыл его скачать, сам никак не могу вспомнить, пожалста переделайте ентот пас, чтоб стэк работал для символов, для задачи оч надо на завтра
Сообщение отредактировано: kr3v3tkus -
стэк для символов, переделать |
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.
стэк для символов, переделать |
kr3v3tkus |
Сообщение
#1
|
Пионер Группа: Пользователи Сообщений: 111 Пол: Мужской Реальное имя: Рома Репутация: 0 |
переделывали в инсте стэк, но я забыл его скачать, сам никак не могу вспомнить, пожалста переделайте ентот пас, чтоб стэк работал для символов, для задачи оч надо на завтра
Сообщение отредактировано: kr3v3tkus - Прикрепленные файлы MyStack.pas ( 1.16 килобайт ) Кол-во скачиваний: 308 -------------------- Цитата . . \__/ (**) (>:=:=:~~ ^ ^ ^ ^ Креветка присваивания :DDD |
kr3v3tkus |
Сообщение
#2
|
Пионер Группа: Пользователи Сообщений: 111 Пол: Мужской Реальное имя: Рома Репутация: 0 |
А не могли бы Вы на примере показать - программа запущена, в неё введены символы(например 4) и ";", как занести в стек эти 4 символа с помошью вот этого
Код procedure TStack.Push (Value:Char); var P:PNode; begin new(P); P.Next:=FNode; FNode:=P; P.Info:=Value; end; если можно, то с варом, а то я просто ужасть как путаюсь с переменными, тем более с использованием этих готовых методов -------------------- Цитата . . \__/ (**) (>:=:=:~~ ^ ^ ^ ^ Креветка присваивания :DDD |
Текстовая версия | 13.05.2024 16:24 |