1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Костян |
16.02.2006 11:54
Сообщение
#1
|
![]() Пионер ![]() ![]() Группа: Пользователи Сообщений: 68 Пол: Мужской Репутация: 0 |
Народ отсень простенький вопрос(в поиске не нашел, так что спрашиваю напрямую). Есть файл file.txt и нужно сделать прогу которая бы выводила текст этого файла на экран. Вот и все. Вот что у меня получилось:
Код program qest; Обьясните же мне старому дурню шо тут не так. uses crt; var fiile : text; begin clrscr; assign(fiile,'file.txt'); reset(fiile); writeln(fiile); readkey; end. -------------------- ...И заключили ТЕМНЫЕ И СВЕТЛЫЕ програмисты договор... ...и было в том договоре сказано.... ...что будет создан ночной дозор для контроля темных программистов... ...и будет создан дневной дозор для надзора за светлыми программистами... ..................ТАК НАЧИНАЛАСЬ ЖИЗНЬ ТУРБО ПАСКАЛЯ............. |
![]() ![]() |
| Бродяжник |
16.02.2006 14:08
Сообщение
#2
|
|
Бывалый ![]() ![]() ![]() Группа: Пользователи Сообщений: 206 Пол: Мужской Репутация: 3 |
Тут слишком много вопросов:
- в какой кодировке набран текстовый файл? - он точно текстовый? в смысле ASCII? - в каком режиме работает программа? Соответственно и решений может быть много: - перекодировать входной файл - перед запуском программы подгружать русификатор экрана - в самой программе переводить считанные строки в требуемую кодировку, а уж потом выводить на экран - и тогда, может быть, нужно будет предусмотреть возможность разных режимов, типа "считать файл KOI-8R и вывести его в альтернативной кодировке". |
Костян Проблема с чтением из файла... 16.02.2006 11:54
volvo assign(fiile,'file.txt'); reset(fiile);
w... 16.02.2006 12:00
Костян Огромное спасибо все заработало, но возникла еще о... 16.02.2006 12:19![]() ![]() |
|
Текстовая версия | 8.12.2025 17:38 |