What is the output of the given statement?
* (defstruct triangle (base 0) (altitude 0))
* (defun area (figure) (cond ((triangle-p figure) (* 1/2 (triangle-base figure) (triangle-altitude figure)))))
* (setf triangle (make-triangle :base 2 :altitude 3))
* (area triangle)
a) Triangle
b) 7
c) 6
d) 10

• 1 Answers
• 2121 Views
• I also Faced
• E-Mail Answers