Arithmetic/Integer: Difference between revisions
Content added Content deleted
(→{{header|F_Sharp|F#}}: adding gap) |
|||
| Line 303: | Line 303: | ||
Serves 5.</lang> |
Serves 5.</lang> |
||
=={{header|Clojure}}== |
|||
<lang clojure>(defn myfunc [] |
|||
(println "Enter x and y") |
|||
(let [x (read), y (read)] |
|||
(doseq [op '(+ - * / Math/pow rem)] |
|||
(let [exp (list op x y)] |
|||
(printf "%s=%s\n" exp (eval exp))))))</lang> |
|||
<pre>user=> (myfunc) |
|||
Enter x and y |
|||
3 |
|||
6 |
|||
(+ 3 6)=9 |
|||
(- 3 6)=-3 |
|||
(* 3 6)=18 |
|||
(/ 3 6)=1/2 |
|||
(Math/pow 3 6)=729.0 |
|||
(rem 3 6)=3 |
|||
nil</pre> |
|||
=={{header|Common Lisp}}== |
=={{header|Common Lisp}}== |
||