Показать сообщение отдельно
  #1  
Старый 23.04.2015, 22:04
oli oli вне форума
Прохожий
 
Регистрация: 23.04.2015
Сообщения: 1
Версия Delphi: Delphi
Репутация: 10
По умолчанию Переписать компоненты файла f в файл g так, чтобы в файле g числа шли в задуманном по

Дан файл f, компоненты которого являются целыми числами. Нулевых компонентов нет. Числа в файле идут в следующем порядке: четыре положительных, четыре отрицательных, четыре положительных, четыре отрицательных и т.д. Переписать компоненты файла f в файл g так, чтобы в файле g числа шли в следующем порядке: 8 положительных, 8 отрицательных, 8 положительных, 8 отрицательных и т.д.(предполагается, что число компонент файла f делится на 16).

Помогите написать процедуру, которая будет записывать числа в файл g
Ответить с цитированием