实验二程序设计.docVIP

  1. 1、本文档共4页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
实验二程序设计.doc

实验二 程序设计 (本实验需提交书面作业) 一、实验目的与要求: Declare @a int,@b int,@c int,@d int Select @a=2,@b=4,@c=1 set @d= @b*@b-4*@a*@c If @d=0 if @d0 select (-@b+sqrt(@d))/(2*@a), (-@b-sqrt(@d))/(2*@a) else select -@b/(2*@a) else select ‘无实根’ 注:试分别修改@a、@b、@c的赋值,看看结果是否按不同分支处理。 2、在if语句中使用begin…end控制流语句 分别验证下列程序(1)和(2),体会else部分begin…end控制流语句的作用 (1) declare @x int,@y int set @x=30 set @y=20 if (@x@y) begin print ***** print ##### end else print$$$$$ print@@@@@ (2) declare @x int,@y int set @x=10 set @y=20 if (@x@y) begin print ***** print ##### end else begin rint$$$$$ print@@@@@ end 3、循环结构的程序设计 DECLARE @n INT SET @n=1 WHILE @n=10 BEGIN PRINT SPACE(11-@n)+REPLICATE(*,@N) SET @n=@n+1 END 体会:(1)哪个是控制循环的变量? (2)在什么地方给控制循环的变量赋初始值? (3)为什么在循环体中必须有改变控制循环的变量的值命令? 4、循环结构中break、continue语句的使用(需使用if语句先判断) 求1000~2000之间不能被3 整除的数,当其累计和刚好到达或超过5000时,输出累加和并结束程序运行。 declare @n bigint,@sum bigint set @n=1000 set @sum=0 while @n=2000 begin if @sum=5000 break else if @n%3=0 begin set @n=@n+1 continue end else begin print @n set @sum=@sum+@n set @n=@n+1 end end print @sum 体会:为什么break、continue语句需放在if语句的分支结构里使用? 5、多重循环结构的程序设计 现有大、中、小3种鱼,大鱼每条5元,中鱼每条3元,小鱼每5条1元。要使100元正好买100条鱼,编写程序求大、中、小鱼的鱼数 Declare @d int,@z int,@x int,@n int Select @d=1,@n=1 While @d=20 begin Set @z=1 while @z=33 begin Set @x=(100- @d*5-@z*3)*5 if @d+@z+@x=100 begin print 第+ltrim(str(@n))+买法: print 大鱼数:+ltrim(str(@d)) print 中鱼数:+ltrim(str(@z)) print 小鱼数:+ltrim(str(@x)) set @n=@n+1 end set @z=@z+1

文档评论(0)

docinpfd + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

版权声明书
用户编号:5212202040000002

1亿VIP精品文档

相关文档