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

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