awk, 84 bytes

Result

WA

Duration

676ms

Code [DL]

/T/{t=index($0,"T");s=$0}/K/{k=index($0,"K");for(s="";t--;k--)s=s (0<k?" ":"K")}$0=s

stdin

                             T                    
                                                  
                                                  
                       K                          

stdout

                             T                    
                             T                    
                             T                    
                        KKKKKK

stderr

strace