正整数 n 的立方一定可以表示成 n 个连续的奇数的和。 10 例如: 1 3=12 3=3+53 3=7+9+ 11 4 3= 13+15+17+19 在这里,若将每一个式中的最小奇数称为 X ,那么当给出 n 之后,请写出 X与n 之间的关系表达式: 四、阅读程序,并写出程序的正确运行结果: (每题 15 分,共 30 分) 1. Program excpl; var x,y, y1, jk, j1,g,e: Integcr ; a: array[l .. 20]of 0..9; begin x := 3465 ;y := 264 ; jk := 20; for j1:=1 to 20 do a[j 1] := 0; while y<>0 do begin y1: =y mod 10; y:=y div 10; while y1 <> 0 do begin g: =x ; for e := Jk downto 1 do begin g := g+ a[e] ; a[e ]:=g mod 10; g:=g div 10 end; y1 := y1-1 end ; jk := jk-1 end ; j1=1 ; while a[j1] =0 do j1: =J1+1 ; for Jk: =j1 to 20 do write(a[jk]:4) WRITELN End. 程序输出结果为: _________________________________ 2. program excp2 var i,j: integer; ; a: array[1 .. 14] of integer ; procedure sw(i1 , j1: Integer) ; var k1: Integer ; begin for k1:=1 to( j1- i1+1 ) div 2 do begin
全文预览
