《PowerBuilder数据库应用开发》练习题.doc

《PowerBuilder数据库应用开发》练****题1、设计一个用户界面,如下图所示,并编写相应脚本,从单行编辑框中输入圆的半径r,按“计算”按钮后,计算圆的周长和面积并将其值输出。在cb_1click事件中输入decimalRR=dec()=string(*2*r)=string(*r*r)在app_1中输入open(w_main)2、设计一个乘法器,要求输入两个数后,点击乘法按钮,显示计算结果。界面如下图所示:在cb_1click事件输入decimalm,nm=dec()n=dec()=string(m*n)在app_1中输入open(w_main)3、编程实现求两个自然数的最大公约数,界面如下图所示:在cb_1中输入longm,n,rm=dec()n=dec()r=mod(m,n)dowhiler<>0 m=n n=r r=mod(m,n)loop =string(n)在app_1中输入open(w_main)4、铁路托运行李,从甲地到乙地,规定每张客票托运费计算方法是:行李重量不超过50千克时,;超过50千克而不超过100千克时,;超过100千克时,。编写程序,输入行李重量,计算并输出托运的费用,设计一个用户界面,界面如下图所示,并编写相应脚本。在cb_1中输入decg,fg=dec()choosecaseg caseis<=50 =string(g*) case50to100 =string((g-50)*+50*) caseelse =string((g-100)*+50*+50*)endchooseopen(w_main)5、设计一个用户界面,如下图所示,将1800年~2010年之间所有闰年输出,并统计个数,编写其相应脚本。在cb_1的declareinstancevariables中输入intc=0integerli_year,sfors=1800to2010 ifmod(s,4)=0andmod(s,100)<>0ormod(s,400)=0then (string(s)) c=c+1 =string(c)图26、设计个人所得税计算器,按如下公式进行收税:在cb_1中输入integeristringtaxi=integer()choosecasei caseis<=2000 tax=string(0)case2000to2500 tax=string((i-2000)*)case2500to4000 tax=string((i-2000)*-25)case4000to9000 tax=string((i-2000)*-125)caseelse tax=string((i-2000)*-325)=taxopen(w_main)7、设计一个界面并编写相应脚本,将100~500之间所有除3余1、除5余2且除7余2的所有数输出,并统计其个数。decaintistringstr=""fori=100to500 ifmod(i,3)=1andmod(i,5)=2andmod(i,7)=2then a=a+1 str=str+""+string(i) ==string(a) 8、设计一个界面并编写相应脚本,将1~1000之间的所有“完备数”输出。所谓“完备数”即其值等于其所有的因数(不包括其自己本身)的和的数。如6=1+2+3,28=1+2+4+7+14。inti,j,s,sumfori=1to1000 s=0 forj=1toi-1 ifmod(i,j)=0then s=s+j endif next ifi=sthen =+string(i)+"" endifnext9、编写一个华氏温度与摄氏温度之间转换的程序,界面如下图所示。要使用转换的公式是:,摄氏温度转化为华氏温度,f为华氏温度,华氏温度转化为摄氏温度,c为摄氏温度10、在购买某物品时,若所标明的价钱x在下述范围内,所付钱y按对应折扣支付:deca,ba=integer()choo