Какая LISP фуекция проверяет чётность/нечётность числа?
Если такой функции нет-то какая функция определяет целое число или вещественное?

[VVA]

Код:

[Выделить все]

(defun IsOdd ( num )
  ;;;Возвращает T если число нечетное
  (= (logand num 1) 1)
  )

(defun IsOdd1 ( num )
  ;;;Возвращает T если число нечетное
  (= (rem num 2) 1)
  )

Сообщение от Владимир Егорьев какая функция определяет целое число или вещественное?

Команда: (type 3) INT Команда: (type 4.45) REAL

[VH_]

Код:

[Выделить все]

(defun F (N)
 (cond
  ((= (rem N 2) 0) 'even)
  ((= (rem N 2) 1) 'odd)
  (T 'float)))

Спасибо VH_ & VVA

VVA про функцию type только что прочитал в книге.Спасибо.

[VH_]

Однако
(type 3.0) возвращает REAL

[ShaggyDoc]

Сообщение от VH_ Однако (type 3.0) возвращает REAL

Естественно. И об этом не надо забывать, особенно в последующих действиях.