单项选择题

阅读下列程序 
FUN(c,d)=a*c+b/d 
DATA a,b/1.0,1.0/ 
WRITE(*,’(F4.1)’)
FUN(a,b)-FUN(b,a) 
END 
程序运行结果是()

A. 0.0
B. 4.0
C. 2.O
D. 3.O

<上一题 目录 下一题>
热门 试题

单项选择题
阅读下列程序  N=0  DO 10 K=1,3  N =N+1  M=K*N  10 CONTINUE  WRITE(*,’(1X,2I3)’)M,K  END  程序运行结果是()

A. 9  4
B. 9  3
C. 12  4
D. 12  3(#^)

单项选择题
阅读下列程序  CHARACTER A*4,B*5,C*4  DATA A,B,C ’BIG’,’MIDDLE’,’SMALL’   WRITE(*,20)A,B,C  20 FORMAT(1X,A2,A3,A4)  END  程序运行结果是()

A. BIGMIDDLE
B. *********
C. BIGMIDSMA
D. BIMIDSMAL

相关试题
  • 阅读下列FORTRAN77程序: 在执行上述程...
  • 阅读下列FORTRAN程序,写出运行上述程序后...
  • 阅读下列FORTRAN程序,写出最后输出的X值。
  • 阅读下列FORTRAN程序,写出程序运行的结果...
  • 阅读下列FORTRAN程序,写出程序运行的结果...