(ns bob) (defn yelled? [sentence] (and (re-find #"[A-Z]" sentence) (not-any? #(Character/isLowerCase %) sentence))) (defn response-for [sentence] (condp apply ...
確定! 回上一頁