Без использования массивов упорядочить значения в файле по возрастанию

@Карпов · Регистрация: 17.03.2015

Студворк — интернет-сервис помощи студентам

С помощью генератора псевдослучайных чисел (Random(100)) сформировать файл из N элементов. Без использования массивов упорядочить значения по возрастанию. Результат сохранить в отдельном файле. Подпрограмма создания псевдослучайного файла должна быть в отдельном модуле.

У меня не получается упорядочить элементы которые хранятся в текстовом файле.
С какой переменной необходимо его связывать и где хранить результаты?

@Vidocq · 14.09.2008, 14:29

Недочитав условие сотворил 2 варианты:
1) Использовать дополнительный файл и туда записывать минимальный(максимальный) елемент последовательности из выходного файла
2) Обойтись одним файлом, но нужно придумать как удалить неупорядоченную последовательность (тоесть после "сортировки" у нас будет две последовательности и вторая из них будет упорядоченным вариантом первой)

Но раз результат нужно сохранить в отдельном файле пользуемся первым вариантом...

@Карпов · 14.09.2008, 15:14 **[ТС]**

А как искать минимальный (максимальный) элемент прямо в файле?

Vourhey · 14.09.2008, 15:24

Считал элемент, сравнил с другим, следующий прочитал, опять сравнил...

@Карпов · 14.09.2008, 15:41 **[ТС]**

Код

var
first,second:integer;
......................
......................
Read (f,first);
Read (f,second);
if first>second then

Сравнил и что дальше????

Vourhey · 14.09.2008, 15:50

Ну ты разве не знаешь, как искать минимум в массиве? Здесь также, только элемент ычитаются из файла по одному.

@Карпов · 14.09.2008, 18:11 **[ТС]**

И все таки не ясно как перемещаться по текстовому файлу?
Если я все понимаю правильно:

Я открываю файл. Процедурой Read считываю 1-ый , а затем 2-ой элементы. Сравниваю их если 2-ой меньше чем 1-ый то необходимо их поменять местами. (Как это сделать ?). Далее необходимо прочитать 2-ой и 3-ий элемент, повторить сравнение и перестановку элементов если это необходимо (Опять проблема...). и так пока элементы не будут упорядочены.

Vourhey · 14.09.2008, 18:17

Да нет. Не менять местами. Прошел по всем элементам сначала, нашел минимум, записал его в файл. Потом нашел следующий минимум, исключая найденные предыдущее, и тоже записал.

@Карпов 0 / 0 / 0 Регистрация: 17.03.2015 Сообщений: 1
		1
	Без использования массивов упорядочить значения в файле по возрастанию 14.09.2008, 14:03. Показов 1592. Ответов 7 Метки нет (Все метки) С помощью генератора псевдослучайных чисел (Random(100)) сформировать файл из N элементов. Без использования массивов упорядочить значения по возрастанию. Результат сохранить в отдельном файле. Подпрограмма создания псевдослучайного файла должна быть в отдельном модуле. У меня не получается упорядочить элементы которые хранятся в текстовом файле. С какой переменной необходимо его связывать и где хранить результаты? 0

@Vidocq 3 / 3 / 2 Регистрация: 22.01.2007 Сообщений: 41
	14.09.2008, 14:29	2
	Недочитав условие сотворил 2 варианты: 1) Использовать дополнительный файл и туда записывать минимальный(максимальный) елемент последовательности из выходного файла 2) Обойтись одним файлом, но нужно придумать как удалить неупорядоченную последовательность (тоесть после "сортировки" у нас будет две последовательности и вторая из них будет упорядоченным вариантом первой) Но раз результат нужно сохранить в отдельном файле пользуемся первым вариантом... 0

@Карпов 0 / 0 / 0 Регистрация: 17.03.2015 Сообщений: 1
	14.09.2008, 15:14 [ТС]	3
	А как искать минимальный (максимальный) элемент прямо в файле? 0

Vourhey Почетный модератор 7390 / 2636 / 281 Регистрация: 29.07.2006 Сообщений: 13,696
	14.09.2008, 15:24	4
	Считал элемент, сравнил с другим, следующий прочитал, опять сравнил... 0

@Карпов 0 / 0 / 0 Регистрация: 17.03.2015 Сообщений: 1
	14.09.2008, 15:41 [ТС]	5
	Код var first,second:integer; ...................... ...................... Read (f,first); Read (f,second); if first>second then Сравнил и что дальше???? 0

Vourhey Почетный модератор 7390 / 2636 / 281 Регистрация: 29.07.2006 Сообщений: 13,696
	14.09.2008, 15:50	6
	Ну ты разве не знаешь, как искать минимум в массиве? Здесь также, только элемент ычитаются из файла по одному. 0

@Карпов 0 / 0 / 0 Регистрация: 17.03.2015 Сообщений: 1
	14.09.2008, 18:11 [ТС]	7
	И все таки не ясно как перемещаться по текстовому файлу? Если я все понимаю правильно: Я открываю файл. Процедурой Read считываю 1-ый , а затем 2-ой элементы. Сравниваю их если 2-ой меньше чем 1-ый то необходимо их поменять местами. (Как это сделать ?). Далее необходимо прочитать 2-ой и 3-ий элемент, повторить сравнение и перестановку элементов если это необходимо (Опять проблема...). и так пока элементы не будут упорядочены. 0

Vourhey Почетный модератор 7390 / 2636 / 281 Регистрация: 29.07.2006 Сообщений: 13,696
	14.09.2008, 18:17	8
	Да нет. Не менять местами. Прошел по всем элементам сначала, нашел минимум, записал его в файл. Потом нашел следующий минимум, исключая найденные предыдущее, и тоже записал. 0

Опции темы