Конференция "FreePascal" » Запись и чтение [Win32]
 
  • programmer90 (06.11.08 21:38) [0]
    Здравствуйте мастера!
    как прочитать сиволы из файла:
    qweqw wewt 123 4363
    и  записаь в другой  в таком виде:
    wewt qweqw 4363 123
    То есть четный елемент на место нечетного (ближайщего)
    Строка может быть до 32 млн символов.
    Заранее спасибо!
  • tesseract © (08.11.08 10:54) [1]
    AssignFile  Readln Writeln
  • Сергей М. © (08.11.08 17:30) [2]

    > на место нечетного (ближайщего)


    У четного числа 6 два ближайших нечетных числа - 5 и 7.
    Вопрос на засыпку - с каким менять, с 5-м или 7-м, если оба удовлетворяют условию "близости" ?
  • programmer90 (08.11.08 21:34) [3]
    Да похоже вы не поняли сути дела
    Символы  которые были в файле нескольких типпов: integer, string;

    > AssignFile  Readln Writeln

    В связи с этим возникает вопрос: куда читать?
    Да для облегчения задачи в начале файле дано число символов :
    То есть
    Входной:
    16
    asd qweasd 234 56
    Вычодной:
    qweasd asd 56 234
    > У четного числа 6 два ближайших нечетных числа - 5 и 7.Вопрос
    > на засыпку - с каким менять, с 5-м или 7-м, если оба удовлетворяют
    > условию "близости" ?

    Для определенности скажем что 1-ый меняем со 2-ым, 3-ий с 4-ым, 5-ый с6-ым,   2n-1  c 2n-ым...
    Спасиб за то что здесь бываете:)
  • tesseract © (08.11.08 22:47) [4]

    > Да похоже вы не поняли сути дела


    Ты его и не сказал. Читай по символу - пото выясняй что ты считал. Алгоритм твоей задачи отлично находиться по "нестабильный конечный автомат"
  • Сергей М. © (14.11.08 09:24) [5]

    > Символы  которые были в файле нескольких типпов


    Символ он и в Африке символ, у него не может быть никакого типа.


    > Входной:
    > 16
    > asd qweasd 234 56
    > Вычодной:
    > qweasd asd 56 234


    Это ты меняешь местами не символы, а подстроки входной строки !


    > куда читать?


    Да куда хочешь, туда и читай..
    Можешь в массив строковых значений, можешь в StringList - и то и другое дают возможность индексного доступа к элементам
 
Конференция "FreePascal" » Запись и чтение [Win32]
Есть новые Нет новых   [118447   +35][b:0.025][p:0.009]