※ 引述《MTLOVER (我要加油~~~)》之铭言： : 请问大家 : 如以下的程式码: : (setq ask (getstring "\n是否还要选点?[Y/N]")) : (While ask(= Y) : (setq p5 (getpoint "\n请选点:")) : (setq p5x (nth 0 p5) : p5y (nth 1 p5) : p5z (nth 2 p5) : ) : (setq m11 (((* p5x p5x)+) m11) : m12 (((* p5x p5y)+) m12) : m13 ((p5x +) m13) : m21 (= m12) : m22 (((* p5y p5y)+) m22) : m23 ((p5y +) m23) : m31 (= m13) : m32 (= m23) : ) : (setq ask (getstring "\n是否还要选点?[Y/N]")) : ) : 我想要在这个while回圈内 : 如果最後ㄧ行是否还要选点(Y) : 就可以呼叫自己这个回圈ㄧ次 : 一直到如果选择(N)才跳出这个while回圈 : 请问要怎麽写呢? // - - - 这，不叫 递回，这叫做 回圈 (while (> x y) ; do something ; . . . ) 以上，当 (x > y) 的时候，会 重复执行 : 还有，大家有没有学过C?? // - - - 有！ : 我想要写像是 a= a + b : 新的 a 会取代掉旧的 a : 这种要怎麽写阿?? // - - - (setq a (+ a b)) 看你的 文章很累，先回答 这个问题， 其他的，再说 : 像我程式中的m11~m33 : 就是想写这种 : 拜托教教我~~很急~~ : 因为是新手~请大家多多包函 // - - - 请问你 有没有买书？ 有没有看书？ : 谢谢谢谢~~~ --

※ 发信站: 批踢踢实业坊(ptt.cc) ◆ From: 123.194.156.130