第4章流程控制语句循环结构第4次作业答案.docVIP

第4章流程控制语句_循环结构第4作业 1. 设纸的厚度为0.5毫米，将纸对折，再对折…，求至少对折多少次，纸张的厚度能达到珠穆朗玛峰的高度8848米。 Declare @i float,@n int Set @i=0.0005 Set @n=0 While @i=8848 Begin Set @i=@i*2 Set @n=@n+1 End Print @n 2. 在国际象棋棋盘的64个格上依次放入小麦1粒、2粒、4粒、8粒…，求按此规律放满64个格需要多少粒小麦。 Declare @i int, @sum float Set @i=1 Set @sum=0 while @i=31 Begin Set @sum=@sum+power(2,@i-1) Set @i=@i+1 End Print @sum 二重或多重循环 3. 编写程序，输出由1、2、3、4、5、6这六个数字组成的所有可能的两位数，并统计它们的个数。 Declare @i int, @j int, @m int, @n int Set @n=0 Set @i=1 While @i = 6 Begin Set @j=1 While @j = 6 Begin Set @m = 10 * @i + @j Print @m Set @n = @n + 1 Set @j=@j+1 End Set @i=@i+1 End Print str(@n)+个 4. 编写程序，输出由1、2、3、4这四个数字组成的所有可能的三位数，并统计它们的个数。 Declare @i int, @j int, @k int, @m int, @n int Set @n=0 Set @i=1 While @i = 4 Begin Set @j=1 While @j = 4 Begin Set @k=1 While @k =4 begin Set @m = 100* @i + 10*@j + @k Print @m Set @n = @n + 1 Set @k=@k+1 End Set @j=@j+1 End Set @i=@i+1 End Print str(@n)+个 5. 编写程序，输出由1、2、3、4这四个数字组成的所有可能的四位数，并统计它们的个数。 Declare @i int, @j int, @k int, @m int, @n int, @l int Set @n=0 Set @i=1 While @i = 4 Begin Set @j=1 While @j = 4 Begin Set @k=1 While @k =4 Begin Set @l=1 While @l=4 Begin Set @m = 1000* @i + 100*@j + 10*@k+@l Print @m Set @n = @n + 1