С наступающим Новым годом! Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
gipzip
0 / 0 / 0
Регистрация: 01.10.2013
Сообщений: 7
1

Работа с файлами

17.11.2013, 23:42. Просмотров 232. Ответов 0
Метки нет (Все метки)

Помогите пожалуйста!
Есть два файла f1.txt f2.txt
В первом например есть:
Код
1
2
3
4
Во втором:
Код
5
6
7
8
Задача состоит в том, чтобы скрестить строки файлов по очереди и вывести на экран
Код
1
5
2
6
3
7
4
8
Добавлено через 2 часа 10 минут
Ребята, написал код, но почему не работает дальше первой строки
Код
var
   f1:Text;
   f2:Text;
   i,m:byte;
   c1,c2:char;
begin
  Assign(f1,'1.txt');
  Assign(f2,'2.txt');
  Reset(f1);
  Reset(f2);
  writeln('start: ');
  while not eoln(f1) do
	begin
	read(f1,c1);
	read(f2,c2);
	writeln(c1);
	writeln(c2);
	end;
close(f1);
close(f2);
readln;
end.
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.11.2013, 23:42
Ответы с готовыми решениями:

работа с файлами
здравствуйте.я вас очень прошу помогите решить задачу.чтоб просто было решено...

Работа с файлами
даны символьные файлы f1 f2. переписать в файл f посимвольно из файлов f1 и f2....

Работа с файлами
Задание-найти в массиве минимальный элемент и записать его в первую строку...

Программирование и работа с файлами
Задание: Спасибо!

Работа с файлами(Задание)
Задан текстовый файл. Подсчитать количество строк , начинающихся и...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.11.2013, 23:42

Работа с файлами на паскале
Всем привет. Пожалуйста помогите мне, как инициализировать файл. Например я...

Работа с типизированными файлами
Описать записи с именем ORDER, содержащую следующие поля: расчетный счет...

работа с типизированными файлами
в корневом каталоге диска С:сформировать файл zl.xxx,который будет содержать 30...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru