Убрать перенос строк в файле - Turbo Pascal

Узнай цену своей работы

Формулировка задачи:

Есть файл abc sdf xyz Как заменить его на abcsdfxyz, либо считать в строку вида 'abcsdfxyz', чтобы не было переносов строк. В принципе можно перенос строк заменить на любой другой символ, например точку или запятую. Спасибо

Решение задачи: «Убрать перенос строк в файле»

textual
Листинг программы
...
while not EoF(inFile) do
  begin
    readln(inFile,string1);
    string2:=string2+string1;
  end;
rewrite(inFile);
writeln(inFile,string2);
close(inFile);
...

Объяснение кода листинга программы

  1. В цикле while не EoF(inFile) do происходит чтение строки из файла inFile и добавление её к строке string2.
  2. После окончания цикла while происходит перезапись содержимого файла inFile строкой string2.
  3. Затем файл inFile закрывается.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

9   голосов , оценка 4.333 из 5
Похожие ответы