 Как найти максимальное число в тексте? |
Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
ВНИМАНИЕ!
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.
| KljaGGsa |
Сообщение
#1
|
|
Новичок  Группа: Пользователи Сообщений: 16 Пол: Женский Репутация:  0   |
Если есть текстовый файл Т.txt , в тексте которого содержится несколько трехзначных чисел, как должна выглядеть процедура, с помощью которой можно было бы найти максимальное число и присвоить его целочисленной переменной i ?
|
   |
 
|
  |
Ответов
| youngDelphyGirl |
Сообщение
#2
|
|
Группа: Пользователи Сообщений: 6 Пол: Женский Репутация: 0 |
Цитата(volvo @ 6.08.2009 11:14)  Единственное, на что надо обратить внимание при чтении из этого файла в StringList: разбивается содержимое файла построчно и по тому символу, который задан в DelimiterChar, то есть, перед сохранением Memo->File надо все сочетания #13#10 заменить на какой-нибудь особый символ или последовательность (StringReplace подходит для этого как нельзя лучше), а потом, когда нужный фрагмент в StringList-е уже найден, заменить эту последовательность назад на #13#10. Как превратить эти светлые соображения в код, пока что представляю очень неясно . . .  Цитата(volvo @ 6.08.2009 11:14) P.S. Викторину какую-то пишешь что-ли? Может, выгоднее засунуть вопросы в БД (скажем, MSAccess)? Чем больше будет вопросов - тем выгоднее будет решение с Базой Данных. Мало ли, вдруг захочется еще и вопросы с изображениями включить...  Нет, о викторинах и публичной работе речи нет, это должна быть простая запоминалка для личного пользования Сообщение отредактировано: youngDelphyGirl - |
|
|
|
Сообщений в этой теме
KljaGGsa Как найти максимальное число в тексте? 5.07.2009 22:57
volvo Что кроме чисел есть в файле, и чем отделяются сло… 5.07.2009 22:59 KljaGGsa Вот образец содержимого файла:
001
фрагмент текс… 6.07.2009 10:06 volvo Общее количество строк в файле...
var sL: TStringL… 6.07.2009 16:46 KljaGGsa Вот на эту строчку:
if TryStrToInt(sL.Strings[i],… 6.07.2009 18:00 volvo Ну, так переменную Value типа Integer надо описать… 6.07.2009 18:32 KljaGGsa Владимир, а можно Вас попросить добавить комментар… 6.07.2009 18:51 volvo Комментарии добавлены... 6.07.2009 19:04 KljaGGsa Так хотелось бы с вашей помощью эти комментарии пр… 6.07.2009 19:13 volvo KljaGGsa, я имел в виду, что я в свой код, выше (в… 6.07.2009 19:31 KljaGGsa Есть целочисленная переменная r, значение которой … 6.07.2009 19:49 volvo Смотри:
procedure TForm1.Button2Click(Sender: TObj… 6.07.2009 21:41 KljaGGsa Ну да, мы изначально условились, что r входит в ди… 6.07.2009 23:02 youngDelphyGirl
p := 5; // Будем искать в файле фрагмент № … 5.08.2009 7:17
volvo А если мы даже приблизительно не знаем, сколько фр… 5.08.2009 12:15 youngDelphyGirl
А нам и не надо знать, сколько фрагментов в текст… 6.08.2009 13:39 volvo В принципе, не вижу проблем, чтоб хранить в файле … 6.08.2009 15:14 volvo Очень просто...
На форме - Мемо, и две кнопки, од… 6.08.2009 19:06 youngDelphyGirl Спасибо, сейчас начну писать построчные комментари… 9.08.2009 12:25 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 6.09.2025 9:47 |
Связь с администрацией: bu_gen в домене octagram.name