import Data.Bool

main = do
 [a,b] <- map read . words <$> getLine :: IO [Int]
 putStrLn $ bool "K" "S" (a>=b)