|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
25.12.2008, 16:55 | #1 |
Регистрация: 25.12.2008
Сообщений: 6
|
Программа на текстовый файл
Помогите плиз - я не знаю как это сделать: "Создать текстовый файл, который состоит из 10 строк. В файле поменять местами 1-ую и последнюю строчку". Заранее благодарю!!!
|
25.12.2008, 17:28 | #2 |
Форумчанин
Регистрация: 22.12.2008
Сообщений: 104
|
Кажется так
uses crt;
var mas:array[1..10] of string; i,j:integer; s:string; fil:text; begin clrscr; assign(fil,'c:\x.txt'); rewrite(fil); for i:=1 to 10 do begin readln(s); writeln(fil,s); end; close(fil); assign(fil,'c:\x.txt'); reset(fil); for i:=1 to 10 do begin readln(fil,mas[i]); end; close(fil); assign(fil,'c:\x.txt'); rewrite(fil); writeln(fil,mas[10]); for i:=2 to 8 do writeln(fil,mas[i]); writeln(fil,mas[1]); close(fil); readln; end.
@(o_0)@
|
25.12.2008, 20:39 | #3 |
Регистрация: 25.12.2008
Сообщений: 6
|
спасибо!!!!
|
25.12.2008, 21:16 | #4 |
Форумчанин
Регистрация: 16.11.2008
Сообщений: 192
|
Только нужно
Код:
Код:
|
25.12.2008, 22:00 | #5 | |
Форумчанин
Регистрация: 22.12.2008
Сообщений: 104
|
Цитата:
Опечатка
@(o_0)@
|
|
27.12.2008, 10:26 | #6 |
Регистрация: 25.12.2008
Сообщений: 6
|
слухай а он не правильный!!!! препод сказал что тут нет замены строк!!!! напиши кодом как поменять строки!!!!!!!!!=))
|
27.12.2008, 10:57 | #7 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Сначала введи в новй файл s[10], потом с s[2] до s[9], потом s[1].
|
27.12.2008, 14:01 | #8 |
Регистрация: 25.12.2008
Сообщений: 6
|
puporev ты можешь тоже самое кодом????
|
27.12.2008, 14:20 | #9 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
А зачем тебе, если ты даже такое не умеешь и код тебе написали, чуть подделать? Что тебе легче станет? Меньше зеаешь, лучше спишь.
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
текстовый файл | werser | Общие вопросы Delphi | 3 | 06.06.2008 08:42 |
Текстовый файл | subsonic | Общие вопросы Delphi | 5 | 09.03.2008 21:20 |
текстовый файл | Var17 | Общие вопросы Delphi | 1 | 22.12.2007 02:20 |
Текстовый файл в текстовый массив | Kimimaru | Общие вопросы C/C++ | 1 | 02.12.2007 11:55 |
Консольная программа на Си: ввод, вывод, сортировка, сохранение в текстовый файл. | zerg | Помощь студентам | 8 | 16.11.2007 12:57 |