Тема: помогите решить задачу в Delphi!! никак не могу справиться(
Показать сообщение отдельно
  #4  
Старый 20.12.2012, 15:26
Аватар для Yurk@
Yurk@ Yurk@ вне форума
Специалист
  
Регистрация: 07.09.2007
Адрес: Украина, г. Днепропетровск
Сообщения: 892
Версия Delphi: 7 + ОгнеПтица
Репутация: выкл
По умолчанию
навскидку
Код:
while not f.Eof do
 Writeln(g, ' '+Readln(f));
обьявление переменных (f и g) и Assign думаю сам сделаешь
__________________
Поживу - увижу, Доживу - узнаю, Выживу - учту.
[P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
Ответить с цитированием