Something like this should work. You will possibly need to add code to appropriately sort your list of images. I've marked where you would do it.
imageFolder = uigetdir('', 'Select Image Folder');
destinationFolder = uigetdir(imageFolder, 'Select Destination Folder');
contents = dir(imageFolder);
fileList = contents(~[contents.isdir]);
% Sort list as needed here
filesToMove = fileList(1:10:end);
fromPaths = fullfile(imageFolder,{filesToMove.name});
toPaths = fullfile(destinationFolder,{filesToMove.name});
for fileIdx = 1:numel(fromPaths)
copyfile(fromPaths{fileIdx}, toPaths{fileIdx})
end
Also I'm note sure the specific relevance of folders AAA and A. If AAA, A, and B are all known folders and you want to create C based on them, you could replace the uigetdir code with something like
imageFolder = fullfile(AAA,A,B);
destinationFolder = fullfile(AAA,A,C);
if ~exist(destinationFolder, 'dir')
mkdir(festinationFolder);
end
