OUTPUT/FA(LABEL)

DECL/COMMON,DOUBLE,SY,YY

DECL/COMMON,CHAR,256,LABEL

AA   =   PROMPT/TEXT,'请输入要评价的特征',edit,LABEL

SY   =   OBTAIN,FA(@LABEL),4                                         (关键字   @)

YY   =   ASSIGN / SY *2

WRITE/DID(DEFAULTSCREEN),'SYMMETRY(',LABEL,')=     ',YY

 

麦的工程师做的，与大家共享！

------------------------------------------------------------------------
努力就会有进步！