s= " "
zh=0
輸入“請輸入要比較的數字個數(必須大於1):”到p &;
do whil k & lt=p
輸入“請輸入要比較的數字“+allt(str(k))+”:“to m”
s=s+","+allt(str(m,8,2))
k=k+1
zh=zh+m
endd
pjz=zh/p
bds=subs(allt(s),2,len(allt(s))-1)
“+bds+”中的最小值是”,min(&;bds)
“+bds+”中的最大值是:“,max(&;bds)
" "+bds+"這些數據的總和是:",zh。
" "+bds+"這些數據的平均值是:",pjz。