阅读下列程序 
A=3.5 
CALL SUBA（A，A，A） 
WRITE（*，’（F4.1）’）A 
END 
SUBROUTINE SUBA（X，Y，Z） 
Y=Y-2.0 
Z=Z+X 
END 
程序运行的结果是（）

阅读下列程序  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

点击查看答案

阅读下列程序  READ（*，*）K  WRITE（*，100）K  100 FORMAT（I5）  END  程序运行时输入初始值12345，那么显示结果是（）

A. 2345
B. 12345
C. ****
D. *****

点击查看答案