(write-line "Hello World") (defun R (x1 y1 x2 y2) (sqrt + * ((- x1 x2)(- x1 x2))* ((- y1 y2)(- y1 y2)) ) (print (R 1 1 2 2))
We use cookies to provide and improve our services. By using our site, you consent to our Cookies Policy. Accept Learn more
