下列程序完成按以下格式打印杨辉三角形的前N行: 1 1 1 1 2 1 1 3 3 11 4 6 4 1请在横线处填写适当语句,使程序完整。 PARAMETER( N = 10 ) INTEGER A( N, N ), I, J DO I = 1, N ______ END DO DO I = 3, N DO J = 2, I - 1 ______ ENDDO END DO DO I = 1, N WRITE( *, 10 )( A( I, J ), J = 1, I ) END DO10 FORMAT( 1X, 10I5 )END
举一反三
- 下列程序将一个数组的元素逆序重新存放,例如存放顺序为: 8,6,5,4,1 。要求改为: 1,4,5,6,8。请在横线处填写适当语句,使程序完整。 INTEGER, PARAMETER::N = 5 INTEGER A( N ), I, T DATA A/8,6,5,4,1/ WRITE( *, 10 )( A( I ), I = 1, 5 ) DO I = 1, N / 2 T = A( I ) ______ ______ END DO WRITE( *, 10 )( A( I ), I = 1, 5 )10 FORMAT( 1X, 5I4 )END
- 下面程序的时间复杂度为() x=1 for i=1 to n do for j=1 to i do for k=1 to j do x++
- 下面____程序段不能正确显示1!、2!、3!、4!的值。 A: For I=1 To 4 n=1 For j=1 to I n=n*j Next j Print n Next I B: For I=1 To 4 For j=1 to I n=1 n=n*j Next j Print n Next I C: n=1 For j=1 to 4 n=n*j Print n Next j D: n=1:j=1 Do While j<=4 n=n*j Print n j=j+1Loop
- 声明一个变量为局部变量应该用( )。 A: Private Sub Command1 Click() n=5:x=1 Do X=X * I I=I + 1 Loop While I < n Print x End Sub B: Private Sub Command1_Click() n=5:X=1:I=1 Do X=X*I I=I + 1 Loop While I <n Print x End Sub C: Private Sub Command1_Click() n=5:X=1:I=1 Do X=X * I I=I + 1 Loop While I<=n Print X End Sub D: Private Sub Command1_Click() n=5:X=1:I=1 Do X=X * I I=I + 1 Loop While I>n Print X End Sub
- 下面程序的时间复杂度为( ) x=1for i=1 to n dofor j=1 to i do for k=1 to j do x++。 A: O(n^2) B: O(n^3) C: O(n) D: O(nlogn)