(let ((var num int 7) (var ans string ""))
  (begin
    (:= num1 (/ num 2))
    (:= num2 (* num1 2))
    (if (= num1 num2) (:= ans "even") (:= ans "odd"))
    ans))