单项选择题

阅读下列程序
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
程序运行的结果是（）

A. 7.0
B. 5.0
C. 3.5
D. 1.5

<上一题目录下一题>

热门试题

单项选择题

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

相关试题