ClearAll["Global*`"]

folder = "/home/tc/Desktop/test";
dims={600,600};

fldrPaths =FileNames["*",folder];
filePaths = FileNames["*.bin",#]&/@fldrPaths;

importBin[path_,dims_]:=(
ArrayReshape[
Import[path,"Real32"],
dims
]
)
bin2csv[fName_,dims_]:=(
dat =importBin[fName,dims];
newFolder = 
folder<>"/"<>"CSVs/"<>FileNameTake[fName,{-2}];
If[FileExistsQ@newFolder,Null,CreateDirectory@newFolder];
newPath=newFolder<>"/"<>FileBaseName@fName<>".csv";
Export[newPath,dat];
newPath
)

bin2csv[#,dims]&/@Flatten@filePaths