begin+again第四季
@冶版2162：Pascal - 数学黑洞6174.求证:所有四位数的数字(全相同的除外),均能得到6174.输出掉进黑洞的步数 -
邢琴19430475269…… program asdf; var a:array[1000..9998] of integer; b:array[1..24] of integer; i,j,k,l,w,x,y,z,w1,x1,y1,z1,xx,yy,ii:Integer; begin for i:=1000 to 9998 do begin ii:=i; w:=ii div 1000; x:=ii div 100-w*10; y:=ii div 10-w*100-x*10; z:=ii mod 10; if not((w=x)and(x...
@冶版2162：定义一个求阶乘的函数,然后计算1! - 2!+3! - 4!+5! - 6!+7! - 8!+9!.C语言问题 -
邢琴19430475269…… int fact(int n) { int m = 1; while(n>0) { m*=n; n--; } return m; } int main() { int i, sum=0; for(i=1;i<=9;i++) { if(i%2) sum+=fact(i); else sum-=fact(i); } printf(＂1!容-2!+3!-4!+5!-6!+7!-8!+9!=%d\n＂, sum); }
@冶版2162：怎样将短暂性动词的句子转换为延续性动词句子? -
邢琴19430475269…… 现在完成时是中学英语语法的重点之一.它表示过去发生的某一动作或存在的状态,一直持续到现在,并可以和以for或since引导的表示一段时间的状语连用,也可以用在以“how long”提问的句子中,句子中的谓语动词一般为延续性动词.但...
@冶版2162：求1 - 1/2+1/3 - 1/4…+1/99 - 1/100的值 -
邢琴19430475269…… 程序如下:var s:real; i,j:integer; begin s:=0; j:=1; for i:=1 to 100 do begin s:=s+j/i; j:=j*-1; end; writeln(s:0:3); end.输出结果为:0.688
@冶版2162：用 T - SQL语句编程 求2+4+6+8+.........+10000的和 -
邢琴19430475269…… declare @i int,@r int set @r=0 set @i=2 while @i<10000 begin set @r=@r+@i; SET @i=@i+2 end print @r --24995000
@冶版2162：求:使用sql编程计算 S=1+(1+2)+(1+2+3)+(1+2+3+4)+…+(1+2+3+…+N),计算 N=10 -
邢琴19430475269…… -------------------- S=1+(1+2)+(1+2+3)+(1+2+3+4)+…+(1+2+3+…+N) declare @n int,@s int,@i int set @n=1 set @s=0 set @i=0 while @nbegin set @i=@i+@n set @s=@s+@i set @n=@n+1 end print @s-------------------- S=1+1/2+2/3+3/5+5/8+8/13 ...
@冶版2162：编写程序求出下式中n的最大值 2*2+4*4+6*6+''''''''''+n*n<1500
邢琴19430475269…… var a,s:integer; begin a:=0;s:=0; repeat a:=a+2;s:=s+a*a; until s>=1500; writeln(a-2); readln; end. var a,s:integer; begin s:=0;a:=0; while s<1500 do begin a:=a+2;s:=a*a+s; end; write(a-2); end. 当循环次数不确定时,可以用While语句或Repeat语句来做.
邢琴19430475269…… program asdf; var a:array[1000..9998] of integer; b:array[1..24] of integer; i,j,k,l,w,x,y,z,w1,x1,y1,z1,xx,yy,ii:Integer; begin for i:=1000 to 9998 do begin ii:=i; w:=ii div 1000; x:=ii div 100-w*10; y:=ii div 10-w*100-x*10; z:=ii mod 10; if not((w=x)and(x...
@冶版2162：定义一个求阶乘的函数,然后计算1! - 2!+3! - 4!+5! - 6!+7! - 8!+9!.C语言问题 -
邢琴19430475269…… int fact(int n) { int m = 1; while(n>0) { m*=n; n--; } return m; } int main() { int i, sum=0; for(i=1;i<=9;i++) { if(i%2) sum+=fact(i); else sum-=fact(i); } printf(＂1!容-2!+3!-4!+5!-6!+7!-8!+9!=%d\n＂, sum); }
@冶版2162：怎样将短暂性动词的句子转换为延续性动词句子? -
邢琴19430475269…… 现在完成时是中学英语语法的重点之一.它表示过去发生的某一动作或存在的状态,一直持续到现在,并可以和以for或since引导的表示一段时间的状语连用,也可以用在以“how long”提问的句子中,句子中的谓语动词一般为延续性动词.但...
@冶版2162：求1 - 1/2+1/3 - 1/4…+1/99 - 1/100的值 -
邢琴19430475269…… 程序如下:var s:real; i,j:integer; begin s:=0; j:=1; for i:=1 to 100 do begin s:=s+j/i; j:=j*-1; end; writeln(s:0:3); end.输出结果为:0.688
@冶版2162：用 T - SQL语句编程 求2+4+6+8+.........+10000的和 -
邢琴19430475269…… declare @i int,@r int set @r=0 set @i=2 while @i<10000 begin set @r=@r+@i; SET @i=@i+2 end print @r --24995000
@冶版2162：求:使用sql编程计算 S=1+(1+2)+(1+2+3)+(1+2+3+4)+…+(1+2+3+…+N),计算 N=10 -
邢琴19430475269…… -------------------- S=1+(1+2)+(1+2+3)+(1+2+3+4)+…+(1+2+3+…+N) declare @n int,@s int,@i int set @n=1 set @s=0 set @i=0 while @nbegin set @i=@i+@n set @s=@s+@i set @n=@n+1 end print @s-------------------- S=1+1/2+2/3+3/5+5/8+8/13 ...
@冶版2162：编写程序求出下式中n的最大值 2*2+4*4+6*6+''''''''''+n*n<1500
邢琴19430475269…… var a,s:integer; begin a:=0;s:=0; repeat a:=a+2;s:=s+a*a; until s>=1500; writeln(a-2); readln; end. var a,s:integer; begin s:=0;a:=0; while s<1500 do begin a:=a+2;s:=a*a+s; end; write(a-2); end. 当循环次数不确定时,可以用While语句或Repeat语句来做.
