Записать список всех файлов из каталога К, имена которых заканчиваются на цифру, в файл F

C:\Windows\system32>DEL C:\Лаба\K1 *1.*, *2.*, *3.*, *4.* , *5.* , *6.* , *7.*,
*8.*, *9.*

del *????.*

@echo off
Set Folder=C:\Лаба\K
for /f "delims=" %%a in ('dir /b /a-d "%Folder%\*"') do (
  echo %%~na|>nul findstr /R "^...[0-9]$"&& echo %%a||(
  echo %%~na|>nul findstr /R "^....[0-9]$"&& echo %%a
))
pause

dir /b /a-d "C:\Лаба\K\*"|findstr /R ".*[0-9]..*$"

dir /b /a-d "C:\Лаба\K\*"|findstr /R ".*[0-9]..*$"

C:\Windows\system32>copy C:\Лаба\K1\????.* C:\Лаба\K2\

@echo off
setlocal enabledelayedexpansion
if not exist K2\ md K2
for %%A IN (*) DO (
 call :strlen %%~nA
 if !_strlen! LEQ 5 (
  if !_strlen! GEQ 4 (
   copy "%%~A" K2\ >nul 2>nul
  )
 )
)
echo.ALL
pause>nul
exit /b
:strlen
setlocal enabledelayedexpansion
set count=0
set str=%~1
:ag
if "!str:~%count%,1!"=="" (goto :out)
set /a count=!count!+1
goto :ag
:out
endlocal&set _strlen=%count%
exit /b

C:\Windows\system32>copy C:\Лаба\K1\????.* C:\Лаба\K2\

for /f "delims=" %a in ('dir /b /a-d "C:\Лаба\K1\*"') do echo %~na|findstr /R "^....\..*$"&& copy "C:\Лаба\K1\%a" "C:\Лаба\K2\"|| echo %~na|findstr /R "^.....\..*$"&& copy "C:\Лаба\K1\%a" "C:\Лаба\K2\"

dir /b /a-d "C:\Лаба\K1\*"| findstr /R "^....\..*$"> FILELIST.txt
dir /b /a-d "C:\Лаба\K1\*"| findstr /R "^.....\..*$">> FILELIST.txt
for /f "delims=" %a in (FILELIST.txt) do copy "C:\Лаба\K1\%a" "C:\Лаба\K2\"

cmd /V:ON /C "cd /d "C:\Лаба\K1"& for %a in (*) do set FN=%~na& if "!FN:~0,2!" neq "" if "!FN:~0,5!"=="" copy "%a" C:\Лаба\K2"