Result

AC

Duration

759ms

Code [DL]

PUT 0 IN k
FOR i IN {1..50}:
	READ s RAW
	FOR j IN {1..50}:
		IF s@j|1 = "T":PUT j IN t
		IF s@j|1 = "K":PUT j IN k
	SELECT:
		k<>0:
			WRITE " "^^k-1,"K"^^t-k+1
		ELSE:
			WRITE " "^^t-1,"T"/

stdin

                           T                      
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
                                                  
           K                                      

stdout

                           T
                           T
                           T
                           T
                           T
                           T
                           T
                           T
                           T
                           T
           KKKKKKKKKKKKKKKKK

stderr

*** Cannot find or read messages file; using numbers
 (message 3119)  (message 3100)     READ s RAW
 (message 3113)  (message 3111)  (message 3114)   (message 3807) 

strace