结构工程师

导航

2016年一级结构工程师基础考试考前练习题(6)

来源 :中华考试网 2016-09-01

  1、语句序列 DO 10

  I=1,5,2

  DO 10

  J=2,6,2 10

  K=I+J WRITE(*,*) K 执行的结果是

  (A)K=9 (B)K=10 (C)K=11 (D)K=12

  标准答案:c

  2、 若有INTEGER A(-2:2,0:3,1:2),按照在内存中的存储次序,数组A中第8号元素为

  (A)A(-1,0,2) (B)A(0,1,1) (C)A(2,1,2) (D)A(1,1,1)

  标准答案:c

  3、 对下列程序段

  READ(*,*) X

  IF((X.LT.-5.0) .OR. (X.EQ.-1.0))T

  HEN Y=0.0

  ELSEIF(X.LT.0.0)

  THEN Y=1.0/(X+1.0)

  ELSEIF(X.LT.5.0)

  THEN Y=1.0/(X+2.0)

  ELSE Y=0.0 ENDIF ;

  WRITE(*,*)Y

  若输入4.0,则结果为: (A)0.0 (B)1/5 (C)1/6 (D)1/4+2.0

  标准答案:d

  4、以下程序段 DIMENSION A (4) READ *,

  A I=l 10 J=I十1

  20 IF(A(I).LT.A(J))

  THEN T=A(J) A(J)=A(I) A(I)=T

  ENDIF J=J+1

  IF(J.LE.4) GOT0 20 I=I+1

  IF(I.LE.3) GOT0 10 PRINT*,A(4) END

  若输入4,2,3,5,则程序运行结果为:

  (A)4 (B)2 (C)3 (D)5

  标准答案:d

  5、 对下列程序段

  PARAMTER(N=3)

  INTEGER A(N,N) READ *,

  A ’ D0 10 J=1,

  N LS=0 D0 20 I=1,

  N 20 LS=LS+A(1,J) LS=LS/N D0 30 I=1,

  N 30 A(I,J) =A(I,J) -LS 10 CONTINUE PRINT*,

  A END

  若输入2,4,6,8,10,12,14,16,18 则程序运行后A(3,2)为

  (A)一2 (B)0 (C)2 (D)12

  标准答案:c

  6、 以下程序段

  PROORAM MAIN

  EXTERNAL FX Y=TX(FX,3,2) PRINT*,

  Y END

  FUNCION TX(FUN,A,B) TX=(FUN(A)—FUN(B))/2.0 END

  FUNCTION FX(X) FX=X*X END

  运行的结果为 (A)9 (B)4 (C)2.5 (D)6.5

  标准答案:b

  7、 对以下程序段 •

  EXTERNAL LENGTH

  CHARACTER NAME*2 READ(*, *)NAME,

  SCORE

  CALL DRAW(NAME,SCORE,LENGTH) END

  SUEROUTINE DRAW (N,S,F) CHARACTER N*2,

  LINE*20 1NTEGER F M=F(S) ’ D010 1=1,

  M LINE(I:I) =’*’ 10 CONTINUE

  WRITE(*,100)N,

  LINE 100 FORMAT(1X,A2,A6)

  END

  FUNCTION LENGTH(X) LENGTH=INT(X)/100

  END

  若输入’D’,356.8,则程序运行结果为:

  (A)D***

  (B)D****

  (C)D356.8

  (D)D3

  标准答案:d

  8、对以下程序段

  CHARACTER A*4,B*5,C*4

  DATA A,B,C/’BIG’,’

  MIDLE’,’

  SMAL’/ IF(A.GT.B) THEN IF(A.GT.C) THEN PRINT*,

  A ELSE PRINT*,

  B ENDIF ’ ELSE

  IF(B.GT.C)THEN PRINT*,

  B ELSE PRINT*,

  C ENDIF ENDIF END

  其运行结果为

  (A)BIG (B)MIDLE (C)SMAL (D)BIG

  标准答案:b

  9、 INTEGER F

  F(X,Y)=X+Y A=-2.5 B=2.1 B=B+F(A,B) WRITE(*,'(F3.1)')B END

  程序运行的结果是

  (A) 1 (B) 7 (C)2.1 (D)1.7

  标准答案:d

  10、 在fortran77的变量类型说明语句中没有

  (A)real语句 (B)char语句 (C)integer语句 (D) logical语句

  标准答案:b

分享到

相关推荐