import Control.Applicative
import Data.Bool (bool)

main :: IO ()
main = solve <$> map read <$> words <$> getLine >>= putStrLn

solve :: [Int] -> String
solve [a, b] = bool "S" "K" $ a < b