for (i=0; i<100; i++) {
новая_папка = сгененировать_имя_папки();
создать_папку(новая_папка);
переместить_10_картинок(общая_папка, новая_папка);
}
функция переместить_10_картинок(откуда, куда) {
for (i=0; i<10; i++) {
файл = получить_имя_файла_из_папки(откуда)
переместить_файл(файл, куда)
}
}
целое iFile = 0
строка sourcePath = добавитьРазделитель(общаяПапка)
строка targetPath = ""
для fname : перебор по файлам в sourcePath + '*'
строка sourceName = sourcePath + fname
если iFile % РАЗМЕРПАПКИ = 0
строка targetFolder = добавитьРазделитель(целеваяПапка) + целоеВСтроку(iFile / РАЗМЕРПАПКИ)
создатьНовуюПапку(targetFolder)
targetPath = добавитьРазделитель(targetFolder)
копироватьФайл(sourceName, targetPath + fname)
удалитьФайл(sourceName)
iFile = iFile + 1