4、從鍵盤輸入A、B、C三個數值，將它們從小到大排列后輸出。

　　程序代碼：

　　SET TALK Off

　　CLEAR

　　INPUT "A=" TO A

　　INPUT "B=" TO B

　　INPUT "C=" TO C

　　if b

　　d=a

　　a=b

　　b=d

　　endif

　　if c

　　d=a

　　a=c

　　c=d

　　endif

　　if c

　　d=b

　　b=c

　　c=d

　　endif

　　?a,b,c

　　SET TALK ON

　　5、從鍵盤輸入一個數值(0~9)，要求輸出其對應的中文大寫數字(零~玖)。

　　程序代碼：

　　SET TALK Off

　　CLEAR

　　C="零壹貳叁肆伍陸柒捌玖"

　　INPUT "N=" TO N

　　?N,"--->"+SUBSTR(C,2*N+1,2)

　　SET TALK ON

　　6、將前面的1到5題，加上循環，使之被調用執行一次，并可以重復對不同的輸入值完成相同的操作。

　　提示：只要在需要重復執行的語句序列外加上循環控制結構即可。下面以第2小題循環3次，第5小題循環任意次為例說明。

　　(6.2)循環3次

　　程序代碼：

　　SET TALK Off

　　CLEAR

　　FOR I=1 TO 3

　　INPUT "Year=" TO Year

　　if (year%4=0 and year%100!=0) or (year%100=0 and year%400=0)

　　?year,"是閏年"

　　else

　　?year,"不是閏年"

　　endif

　　ENDFOR

　　SET TALK ON

　　(6.5)循環任意次

　　程序代碼：

　　SET TALK Off

　　CLEAR

　　?"PRESS ESC TO EXIT---"

　　C="零壹貳叁肆伍陸柒捌玖"

　　DO WHILE .T.

　　INPUT "N=" TO N

　　?N,"--->"+SUBSTR(C,2*N+1,2)

　　IF INKEY(0)=27

　　EXIT

　　ENDIF

　　ENDDO

　　SET TALK ON