[LISP]
<P><FONT size=2>;;;以下LISP中的数，我想以对话框的形式输入：数A ，B， C，</FONT></P><P><FONT size=2>;;;高手能做一个给小弟试试，(觉得简单的话就帮小弟一下)</FONT></P>
<P><FONT size=2>(defun c:err ()<BR>(setq AA (getreal"\n数A"))<BR>(setq BB (getreal"\n数B"))<BR>(setq CC (getreal"\n数C"))<BR>(setq DD (+(* AA BB) CC ))<BR>(print (strcat "="(rtos DD 2 5)))<BR>)</FONT></P>
页:
[1]