переделывали в инсте стэк, но я забыл его скачать, сам никак не могу вспомнить, пожалста переделайте ентот пас, чтоб стэк работал для символов, для задачи оч надо на завтра
Сообщение отредактировано: kr3v3tkus -
стэк для символов, переделать |
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.
стэк для символов, переделать |
kr3v3tkus |
Сообщение
#1
|
Пионер Группа: Пользователи Сообщений: 111 Пол: Мужской Реальное имя: Рома Репутация: 0 |
переделывали в инсте стэк, но я забыл его скачать, сам никак не могу вспомнить, пожалста переделайте ентот пас, чтоб стэк работал для символов, для задачи оч надо на завтра
Сообщение отредактировано: kr3v3tkus - Прикрепленные файлы MyStack.pas ( 1.16 килобайт ) Кол-во скачиваний: 307 -------------------- Цитата . . \__/ (**) (>:=:=:~~ ^ ^ ^ ^ Креветка присваивания :DDD |
kr3v3tkus |
Сообщение
#2
|
Пионер Группа: Пользователи Сообщений: 111 Пол: Мужской Реальное имя: Рома Репутация: 0 |
если можно, то ещё вопросик, просто ваще первый раз за дельфя сел
как правильно написать: нужно подсчитать все строки мемо1 до строчки с символом ";" чёто я нагородил тут Код while flag = true do if Memo1.Lines.Text(i) <> ";" then inc(f) else flag:=false; -------------------- Цитата . . \__/ (**) (>:=:=:~~ ^ ^ ^ ^ Креветка присваивания :DDD |
Текстовая версия | 11.05.2024 16:05 |