Aniket-508/area_of_square.lisp

Created January 12, 2022 05:56

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/Aniket-508/a5f97228ad983430b6d26f8c3d0eff62.js"></script>
Save Aniket-508/a5f97228ad983430b6d26f8c3d0eff62 to your computer and use it in GitHub Desktop.

Download ZIP

Program to find area of a square in Lisp programming language.

Raw

area_of_square.lisp

	(defun AreaOfSquare()
	(terpri)
	(princ "Enter Side: ")
	(setq side (read))
	(setq area (* side side))
	(princ "Area: ")
	(write area))
	(AreaofSquare)

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment