|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
04.04.2011, 19:55 | #1 |
Пользователь
Регистрация: 07.04.2009
Сообщений: 21
|
файлы, проблема
Здравствуйте, проблема с файлами, нужно написать программу
Написать программу которая построчно вписывает содержимое непустого текстового файла t1 в файл t2, вставляя в начало каждой строки ее порядковый номер (он должен занимать 4 позиции) и пробел! Я написал с процедурой и для одного файла Код:
|
04.04.2011, 20:41 | #2 |
Пользователь
Регистрация: 31.03.2011
Сообщений: 10
|
var
fil:string; temp:string; fin,fail:text; z:word; begin fil:='input.txt'; z:=0; assign(fin, fil); reset(fin); assign(fail,'output.txt'); rewrite(fail); repeat inc(z); Readln(fin, temp); Writeln(fail,z, ' ', temp); until eof(fin); close(fin); close(fail); end. если правильно то челкай на весы
Изучаю delphi,vb,и немного ассемблер.Увлекаюсь радиоэлектроникой.
Radio-programm.ucoz.ru |
04.04.2011, 21:02 | #3 | |
Пользователь
Регистрация: 07.04.2009
Сообщений: 21
|
Цитата:
|
|
04.04.2011, 21:32 | #4 |
Пользователь
Регистрация: 07.04.2009
Сообщений: 21
|
Сделал ещё наброски, но всерано не работает (работает но криво, при в воде 1 и 1 выводит 4110...)
Код:
Последний раз редактировалось amidatong; 04.04.2011 в 21:53. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Не сохраняет файлы (Создает файлы пустышки) | Rock231 | Помощь студентам | 2 | 25.12.2010 12:31 |
Файлы данных.Типизированные файлы. | вылка | Помощь студентам | 6 | 17.05.2010 15:42 |
Структуры и файлы. Проблема с сохранением. | Hacker19_90 | Общие вопросы C/C++ | 2 | 20.03.2009 17:35 |
Проблема с Windows XP, решение - почистить файлы автозагрузки и отключить автозапуск | m1xer | Windows | 8 | 02.09.2008 01:05 |
два вредных вопроса:про асю и прикриплёные файлы файлы | steck | Свободное общение | 3 | 17.06.2007 14:53 |