Реферат на тему:
Числові функції.
Числові функції виконують основні математичні операції над цілими та дробовими числами. Користувач може обрати для роботи точну або наближену раціональну арифметику. Для точної раціональної арифметики розмір цілих чисел, чисельників та знаменників обмежений приблизно до 25000 десяткових знаків.
Примітивними числовими функціями є додавання, віднімання, множеннята ділення. В мові програмування Лісп вони є n-арними, тобто кількість їхніх аргументів необмежена. Синтаксис числових функцій наступний:
1. (+ num1 num2… numM) 3. (* num1 num2… numM)
2. ( — num1 num2… numM) 4. (/ num1 num2… numM)
Функція додавання повертає суму своїх аргументів. Функція віднімання повертає різницю першого аргумента та суми всіх інших аргументів. Функція множення повертає добуток своїх аргументів. Функція ділення повертає частку від ділення першого аргумента та добутку інших аргументів.
$ (+ 2 4 6 7) $ (- 20 3 5 6) $ (* 2 4 6) $ (/ 24 2 2 3)
19 6 48 2
Функціїзбільшеннята зменшеннямають наступний синтаксичний вигляд:
1. (ADD1n). Повертає значення, яке на одиницю більше за аргумент.
2. (SUB1n). Повертає значення, яке на одиницю менше за аргумент.
3. (INCQsym n) Збільшує значення символа sym на число n.
4. (DECQsym n) Зменшує значення символа sym на число n.
Якщо функцію додавання (віднімання) одиниці запустити без аргументів, то виникне переривання по помилці: недостатня кількість аргументів. Якщо у функцію INCQ або DECQ передати один аргумент — символ, то збільшення (зменшення) значення символа відбудеться на одиницю. Окрім того, що функції INCQ та DECQ повертають результат арифметичної дії, значення символів, які передаються до них як аргументи, змінюється.
$ (ADD1 6) $ (SUB1 10)
7 9
$ (SETQ S 10) $ (INCQ S 14) $ (DECQ S 4)
10 24 30
Функції MINта MAXповертають символ з відповідно мінімальним(максимальним) значенням.
1. (MIN n1 n2… nM). $ (MIN 12 3 45 67) $ (MAX 1 2 5 3)
2. (MAX n1 n2… nM). 3 5
Числові вирази в Ліспі записуються в префіксній формі. Вираз 3*5+5*7 для обчислення треба подати у вигляді (+ (* 3 5) (* 5 7)), вираз (3+6)*7 — у вигляді (* (+ 3 6) 7).
Функції порівнянняменше та більше мають n аргументів.
1. (
2. ( > n1 n2… nM) Повертає істину, якщо n1 > n2 >… > nM.
3. ( /= n1 n2… nM) Повертає істину, якщо існують хоча б два числа, які не дорівнюють одне одному.
До функцій порівняннятакож відносяться =.
$ (= 5 3 3 2) $ ( /= 4 4 5)
T T T
$ (
NIL T NIL
Функціїокруглення
(TRUNCATEm n), (ROUNDm n), (CEILINGm n) (FLOORm n)
Ці функції використовуються для округлення дробових чисел до цілих. TRUNCATE виконує округлення до ближчого цілого у напрямку нуля. ROUND виконує округлення до ближчого цілого по значенню до m/n. CEILING виконує округлення до ближнього цілого по верхній межі, FLOOR — по нижній межі. Виклик будь-якої функції з двома аргументами ( m n) еквівалентний виклику функції з одним аргументом: ( (/ n m)), де f — будь-яка з наведених чотирьох функцій.
$ (TRUNCATE 6/4) $ (TRUNCATE -6/4)
1 -1
$ (CEILING 9 4) $ (CEILING -9 4)
3 -2
$ (FLOOR 6 4) $ (FLOOR -6 4)
1 -2
$ (FLOOR 6/4) $ (FLOOR -6/4)
1 -2
Функціїостачі
(REMm n), (MODm n), (DIVIDEm n)--PAGE_BREAK--
ПримітивнафункціяREM повертаєостачувідділеннячислаm наn. ФункціяMOD працюєякREM, алеповертаємодульостачі. Якщо(TRUNCATE m n) повертаєq, а(REM m n) повертаєr, тоm=q*n+r. Функція(DIVIDE m n) повертаєконс, CAR якогодорівнюєчастці, аCDR — остачівідділенняm наn.
$ (REM 6 4) $ (DIVIDE 7 2) $ (REM -6 4) $ (MOD 6 4)
2 (3. 1) -2 2
Знак числа
(SIGNUMn)
Повертає значення -1, 0 або 1 якщо n відповідно від’ємне, 0, або додатне.
Модуль числа
(ABSn) – Модуль числа n.
Чисельник та знаменник
(NUMERATORn), (DENOMINATORn) – чисельник та знаменник числа n.
$ (signum -5/3) $ (abs -5/3)
-1 5/3
$ (numerator 10/8) $ (denominator 10/8 )
5 4
Побітовілогічніфункції
(LOGANDn1 n2...nM), (LOGIORn1 n2… nM),
(LOGXORn1 n2...nM), (LOGNOTn).
$ (LOGAND 5 7 3) $ (LOGIOR 4 2 1)
1 7
$ (LOGXOR 5 2 3) $ (LOGNOT 6)
4 -7
Бульовіфункції
(NOTоб’єкт) – заперечення
(ANDформа1 форма2… формаN) – кон’юнкція
(ORформа1 форма2… формаN) – диз’юнкція
$ (AND (EQL ‘as ‘as) (
T T T
Зсув
(SHIFTm n) — зсув числа m на n бітів.
Якщо m — додатне, то функція повертає результат зсуву числа n вліво на m бітів. Якщо m — від’ємне, то число n зсувається вправо на -m бітів.
(DEFUN SHIFT (N M) продолжение
--PAGE_BREAK--
( (AND (INTEGERP N) (INTEGERP M))
((ZEROP M) N)
((PLUSP M) (SHIFT (* N 2) (SUB1 M)) )
(SHIFT (TRUNCATE N 2) (ADD1 M))
)
(BREAK (LIST 'SHIFT N M) '«Noninteger Argument» )
)
$ (SHIFT 3 1) $ (SHIFT 3 -1) $ (SHIFT 4 -8) $ (SHIFT 3 5)
6 1 0 96
$ (SHIFT D 10)
Noninteger Argument Break: (SHIFT D 10)
НСД, НСК
(GCDn1 n2… nM)
(LCMn1 n2… nM).
ЦіфункціїзнаходятьвідповіднонайбільшийспільнийдільникM чиселтанайменшеспільнекратне.
$ (GCD 24 66 600) $ (LCM 24 66 600)
6 6600
Ірраціональнітатрансцендентніфункції
У файлі irratnal.lsp міститься великий набір ірраціональних та трансцендентних функцій. Аргументи тригонометричних функцій задаються в радіанах.
(EXPx) експонента ex
(EXPTx y) степінь xy
(LOGx y) логарифм logyx. Якщо y не задано, основа вважається рівною e.
(LNx) натуральний логарифм
(SQRTx) квадратний корінь
(ISQRTx) ціла частина з квадратного кореня
(SINx) та (ASINx) сінус та арксінус
(COSx) та (ACOSx) косинус та арккосинус
(TANx) та (ATANx) тангенс та арктангенс
(RANDOMn) генерується натуральне число, менше за n.