Запись текста в файл и etc. - Форум «Всё о Паскале»

Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи

Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

Запись текста в файл и etc.

Опции

DEN_NAU	25.09.2003 14:18 Сообщение #1
Группа: Пользователи Сообщений: 3 Репутация: 0	??? Как нистранно, но завис в основном на теме "Запись текста в файл". Условие вроде как простые, но ... - Записать текст в файл F. Переписать в перевернутом виде слова файла F в файл H (порядок слов в файле H должен совпадать с порядком исходных слов в файле F). Кто может? Помогите плз ...

Ответов

DEN_NAU	27.09.2003 7:03 Сообщение #2
Группа: Пользователи Сообщений: 3 Репутация: 0	Да вот начинаю писать прогу типа, чтобы только записать текст в текстовый файл. Все вроде пишется, но не закрывается, тоесть какой-то бесконечный ввод данных? Код ... var F: text; ... BEGIN assign(F,'c:tp7text_1.txt'); {связываем переменную с файлом} rewrite(F); while (not eof(input)) do {цикл ввода пока не достигнет конца ввода} begin read(symb); {читаем каждый символ} write(F,symb); {записываем сиволы в файл} end; close(F); {закрываем файл} ... END. Вот, что тут не так? Сообщение отредактировано: volvo - 17.12.2004 14:22