Prove the Equation by ar44denchi

(let* ((x (read))
       (y (read))
       (z (read))
       (xa (expt x y))
       (xb (expt (expt x z) (/ y z))))
  (format t "~A^~A=(~A^~A)^(~A/~A)~%~A=~A~%~A" x y x z y z xa xb (if (= xa xb)
                                                                     "It is true"
                                                                     "It is false")))

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

To protect the system from spam, please input your favorite sport (hint: I believe its name must start with 'g', case insensitive)


return to the top page