random,textfile, дипломная работа

← →
Vainu (2012-06-05 03:44) [0]

Добрый день. Сам я не программист, но пришлось столкнуться с одной задачей в процессе написания диплома. Очень прошу помочь, так как собственных знаний не хватает.
В общем, имеется текстовый файл с 2000 страницами. Требуется составить пакет(текстовый файл) P1 укомплектованный 50 страницами, случайным образом извлеченными из общего числа в 2000 страниц. В пакет Pk, k = 2, …,40, включить 50k страниц, из которых 50(k - 1) – те же, что и в пакете Pk-1, и еще 50 дополнительных извлечены случайным образом из числа оставшихся 2000 - 50(k - 1) страниц. Последний пакет P40 долзжен включать в себя все подготовленные к обработке экспериментальные данные, т.е. 2000 страниц.
Буду признателен любой помощи.

← →
MBo © (2012-06-05 05:44) [1]

Перемешать все страницы, например, с помощью алгоритма Fisher-Yates.
В первый файл записать 50 первых страниц из перемешанного списка, во второй - 100 и так далее

← →
Vainu (2012-06-05 06:24) [2]

Вы имеете в виду
for i := N - 1 downto 1 do begin temp := A[i]; j := Random(i + 1); // целое в диапазоне 0..i включительно A[i] := A[j]; A[j] := temp; end;

насчёт перемешивания - да, это указанный алгоритм

random,textfile, дипломная работа Найти похожие ветки