欢迎来到天天文库
浏览记录
ID:38685456
大小:30.50 KB
页数:4页
时间:2019-06-17
《第4章流程控制语句循环结构第3次作业》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、第4章流程控制语句_循环结构第3次作业1.Declare@iintSet@i=0While@i<=7beginPrintspace(10-@i)+replicate(‘*’,2*@i+1)Set@i=@i+1end2.Declare@iintSet@=7While@i>=0BeginPrintspace(10-@i)+replicate(‘*’,2*@i+1)Set@i=@i-1endDeclare@iintSet@i=8While@i>=1BeginPrintspace(20-@i)+replicate('*',
2、2*@i-1)Set@i=@i-1End3.Declare@iintSet@=7While@i>=0BeginPrintspace(10-@i)+replicate(‘A’,2*@i+1)Set@i=@i-1endDeclare@iintSet@i=8While@i>=1BeginPrintspace(20-@i)+replicate(Char(65),2*@i-1)Set@i=@i-1End4.Declare@iint,@pvarchar(20)Set@=7set@p=’HGFEDCBA’While@i>=0Be
3、ginPrintspace(10-@i)+replicate(substring(@p,@i+1,1),2*@i+1)Set@i=@i-1endDeclare@iintSet@i=8While@i>=1BeginPrintspace(20-@i)+replicate(Char(65+8-@i),2*@i-1)Set@i=@i-1End5.编程计算从300到1000之间的所有7的倍数之和.Declare@ibigint,@sbigintSelete@i=300,@s=0While@i<=1000Beginif@i%7
4、=0set@s=@s+@iSet@i=@i+1EndPrint@sDeclare@iint,@sbigintSet@i=300Set@s=0While@i<1000BeginIf@i%7=0Set@s=@s+@iSet@i=@i+1EndPrint@s6.编写程序,输入一个数,判定该数是否为素数,如果是素数,则输出“该数是素数”的信息,否则输出“该数不是素数”的信息。Declare@iint,@jintSet@i=18632601644Set@j=2While@j<@iBeginIf@i%@j=0print‘@i’
5、+‘不是素数’set@j=@j+1endIf@j=@iPrint‘@i’+是素数’Declare@iint,@jintSet@i=53Set@j=2While@j<=@i-1BeginIf@i%@j=0breakSet@j=@j+1EndIf@j=@iPrintstr(@i)+'是素数'ElsePrintstr(@i)+'不是素数'7.求s=a+aa+aaa+…+aaa…aaa(n个a),其中a和n的值由用户使用Set或Select语句自己输入。例如,当a=3,n=4时,S=3+33+333+3333。Declar
6、e@aint,@nint,@sintSet@a=3Set@n=1Set@s=0While@n<=4BeginSet@s=@s+@a*(power(10,@n)-1)/9Set@n=@n+1EndPrint@s
此文档下载收益归作者所有