lisp do loop factorial code -


  (defun fact (n) (करू ((i 1 (+ 1 i)) (प्रॉड 1 (* I prod))) ((बराबर) प्रॉड)))  

मैंने ऊपर कोड किया है और जब मैं कोशिश करता हूँ, तथ्य (4) , इसे दे मुझे उत्तर 6 है । मुझे यकीन नहीं है कि क्या गलत हो रहा है क्या कोई मेरी मदद कर सकता है?

में बदलें

  (defun fact (n) (do ( (I 1 (+ 1 i)) (प्रोड 1 (* i प्रॉड))) ((बराबर i (+ n 1)) ठेका)))  

असल में, आप एक कर रहे थे आवश्यक से कम चलना।


Comments

Popular posts from this blog

java - NullPointerException for a 2d Array -

python - Assemble mpeg file unable to play in mediaplayer -

c# - NameSpace Manager or XsltContent to parse aspx page -