Отметьте выражения, объявляющие новый класс, экземпляр объекта, метод.
(Ответ считается верным, если отмечены все правильные варианты ответов.)
Варианты ответа
(setf (slot-value e3 'sd) (read))
(defclass expr (alltd) ((sd :accessor ft)) (:documentation "C-expression"))(Верный ответ)
(td e3)
(defclass alltd () ((type :accessor td)) (:documentation "everyting"))(Верный ответ)
(texpr e3 'expr)
(defmethod texrp ((x expr) (nt atom)) (setf (slot-value x 'type) nt) (setf (td x) nt))(Верный ответ)
(setf e3 (make-instance 'expr))(Верный ответ)