Operazioni matematiche + - * /
(+ numero1 numero2 ....numeron)
Questa funzione restituisce la somma di tutti i numeri: numero1 numero2....numeron
(+ 10 20) restituisce 30
(+ 10 20 30.0) restituisce 60.0
(- numero1 numero2 ....numeron)
Questa funzione sottrae il secondo numero dal primo
se sono presenti pił numeri viene sommato il secondo numero a tutti gli altri e la somma ottenuta viene sottratt al primo
(- 30 10) restituisce 20
(-40 10 20.0) restituisce 10.0
se si utilizza un solo numero
(- 10) restituisce -10
(* numero1 numero2 ....numeron)
Questa funzione restituisce il prodotto di tutti i numeri numero1 numero2....numeron
(* 2 4) restituisce 8
(* 2 4 2.0) restituisce 16.0
se viene indicato un solo numero viene moltiplicato per 1
(* 20) restituisce 20
(/ numero1 numero2 ....numeron)
Questa funzione divide il pimo numero per il secondo e restituisce il quoziente
(/ 12 2) restituisce 6
(/ 100 40.0) restituisce 2.5
(/ 100 40) restituisce 2
se si utilizzani pił numeri il primo numero viene diviso per il prodotto del secondo numero con gli altri
(/ 100 10 4.0) restituisce 2.5
(/ 100 10 4) restituisce 2
esempio:
(defun c:opermat()
(setq a (+ 10 20))
(setq b (- 30 20.0))
(setq c (* 2 2.5))
(setq d (/ a (+ b c)))
(print d)
(princ)
)
salviamo il file lez4.lsp
eseguiamo autocad e scriviamo nella linea di comando
(load "lez4")
facciamo Invio
quindi scriveremo
opermat
Scarica l'esempio
R. Pucci
