Текстовый файл |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Текстовый файл |
Anne'ечка |
Сообщение
#1
|
Гость |
??? ??? ??? :-[
1) Имеется текстовый файл. Написать программу, которая создала бы новый файл, в котором строки были бы пронумерованы, начиная с 1. 2) Имеется текстовый файл. Написать программу, которая создала бы новый файл, в котором каждая строка исходного файла читалась бы наоборот, т.е. 1-ый символ в исходной строке стал бы последним, 2-ой - предпоследним и т.д. Количество срок в файле произвольно. [img][/img] |
dushik |
Сообщение
#2
|
Новичок Группа: Пользователи Сообщений: 49 Пол: Мужской Репутация: 0 |
;D Долго ржал над этим... (над первой версией, и над последним вопросом Анечки)
Как только я увидел первую "программную версию" (в первые секунды), мне показалось, что это на Бэйсике написанно ;) Решаюсь выдвинуть свою первую версию решения второй задачи :-/ Код uses crt; const name='name.txt'; name1='name1.txt'; var f,f1 :text; i,j :integer; s :string[255]; ch :char; begin assign(f,name); assign(f1,name1); reset(f); rewrite(f1); while not eof(f) do begin readln(f,s); for i:=length(s) downto 1 do begin write(f1,s[i]); end; writeln(f1); end; close(f); close(f1); readln; end. -------------------- На самом деле самого дела нет. В самой деятельности заключена самость дела и наоборот. Наоборот получим оборот на, таким образом перевернем образ...
|
Текстовая версия | 3.06.2024 4:07 |