单项选择题 阅读下列程序  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=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  程序运行的结果是（）