第四章程序填空该章以操作题为主，一道题分值为5分。
程序填空1*------------------------------------------题目：表RSDA.DBF结构为：姓名（C，6）；性别（C，2），年龄（N，2），出生日期（D，8）。
判断表中是否有"李明"，查询此人的性别及年龄，确定参加运动会的项目。
*------------------------------------------SET TALK OFFUSE RSDA***********SPACE**********【】 FOR 姓名= "李明"***********SPACE**********IF .NOT. 【】DO CASECASE 性别= "男"?"请参加爬山比赛"CASE 年龄<=50? "请参加投篮比赛"CASE 年龄<=60? "请参加老年迪斯科比赛"***********SPACE**********【】ELSE? "查无此人"BROWSEENDIFUSESET TALK ONRETURN程序填空2*------------------------------------------题目:显示输出图形：*********请在【】处添上适当的内容，使程序完整。
*------------------------------------------CLEAI=1***********SPACE**********DO WHILE 【】J=1DO WHILE J<=7-2*I***********SPACE**********【】j=j+1ENDDO***********SPACE**********【】?ENDDO程序填空3*------------------------------------------题目: 1982年我国第三次人口普查，结果全国人口为10.3亿，假如人口增长率为5%。
编写一个程序求在公元多少年总人口翻了一番。
请在【】处添上适当的内容，使程序完整。
*------------------------------------------SET TALK OFFCLEARP1=10.3N=1R=0.05P2=P1*(1+R)***********SPACE**********DO WHILE P2<=【】***********SPACE**********N=【】***********SPACE**********P2=P2【】(1+R)ENDDN=1982+NN,"年人口总数翻了一番"SET TALK ONCANC程序填空4*------------------------------------------题目: 编写程序，实现矩阵（3行3列）的转置（即行列互换）。
* 例如,输入下面的矩阵：* 1 2 3* 4 5 6* 7 8 9* 程序输出：* 1 4 7* 2 5 8* 3 6 9*请在【】处添上适当的内容，使程序完整。
*------------------------------------------SET TALK OFFcleardime a(3,3)m=1for i=1 to 3for j=1 to 3***********SPACE**********a(i,j)= 【】***********SPACE**********【】endfendffor i=1 to 3for j=1 to 3***********SPACE**********??【】 ,' 'endf?endf程序填空5*------------------------------------------题目: 从读入的整数数据中，统计大于零的整数个数和小于零的整数个数。
用输入零来结束输入，程序中用变量i统计大于零的整数个数，用变量j统计小于零的整数个数。
请在【】处添上适当的内容，使程序完整。
*------------------------------------------SET TALK OFFclearinput "输入整数："to n***********SPACE**********store 【】 to i,j***********SPACE**********do while 【】if n>0i=i+1endifif N<0j=j+1endifinput "输入整数：" to n***********SPACE**********【】"i=",i"j=",jset talk onretu程序填空6*------------------------------------------题目: 计算Y=1+3^3/3!+5^5/5!+7^7/7!+9^9/9!的值请在【】处添上适当的内容，使程序完整。
*------------------------------------------SET TALK OFFCLEARS=0***********SPACE**********FOR I=1 TO 9 【】T=1***********SPACE**********FOR J=1 TO 【】T=T*Jendf***********SPACE**********s=s+【】endf's=',sset talk oncanc程序填空7*------------------------------------------题目: 计算Y=2^2/2!+4^4/4!+6^6/6!+8^8/8!+10^10/10!的值请在【】处添上适当的内容，使程序完整。
*------------------------------------------SET TALK OFFCLEARS=0***********SPACE**********FOR I=2 TO 10 【】T=1***********SPACE**********FOR J=1 TO 【】T=T*Jendf***********SPACE**********s=s+【】endf's=',sset talk oncanc程序填空8*------------------------------------------题目: 请编写一个函数fun，它的功能是：删除字符串中的数字字符。
例如输入字符串：48CTYP9E6，则输出：CTYPE。
请在【】处添上适当的内容，使程序完整。
*------------------------------------------SET TALK OFFclearaccept "请输入一个字符串：" to ss***********SPACE**********l=len(【】)p=''for i=1 to l***********SPACE**********if subs(ss,i,1)>'9' 【】subs(ss,i,1)<'0'***********SPACE**********p=p+【】endifendf'p=',pset talk offcanc程序填空9*------------------------------------------题目: 三角形的面积为：area=sqrt(s*(s-a)*(s-b)*(s-c)).其中s=(a+b+c)/2,a、b、c为三角形三条边的长。
请在【】处添上适当的内容，使程序完整。
*------------------------------------------SET TALK OFFclearinput "a=" to ainput "b=" to binput "c=" to c***********SPACE**********if a+b>c and a+c>b and 【】s=(a+b+c)/2area=sqrt(s*(s-a)*(s-b)*(s-c))***********SPACE**********【】'不能构成三角形'returnendif***********SPACE**********"面积=",【】canc程序填空10*------------------------------------------题目: 下面程序的功能是不用第三个变量，实现两个数的对调操作，请在【】处添上适当的内容，使程序完整。
*------------------------------------------SET TALK OFFclearinput "a=" to ainput "b=" to b***********SPACE**********a=a+【】***********SPACE**********b=【】- b***********SPACE**********a= 【】"a=",a,'b=',bset talk oncanc程序填空11*------------------------------------------*题目: 下面程序的功能是输出1到100之间每位数的乘积大于每位数的和的数。
例如数字26，数位上数字的乘积12大于数字之和8。
请在【】处添上适当的内容，使程序完整。
*------------------------------------------SET TALK OFFclear***********SPACE**********for n=1 to 【】k=1s=0m=ndo while m>0k=k*(m%10)***********SPACE**********s=s+【】***********SPACE**********m=【】(m/10)endd***********SPACE**********if k>【】? 'n=',nendifendfset talk oncanc程序填空12*------------------------------------------题目: 下面的程序是将“计算机等级考试”显示为“计算机等级考试”。