单选题阅读下列程序 X=0.618 WRITE（*，’（E12.4）’）X END 程序运行后显示结果是（）A .6180B 6.180E-01C .0618E+01D .6180E+00
单选题
阅读下列程序 X=0.618 WRITE（*，’（E12.4）’）X END 程序运行后显示结果是（）
A
.6180
B
6.180E-01
C
.0618E+01
D
.6180E+00
参考解析
解析：
暂无解析
相关考题：
有如下程序： DefStr X-Z X="123'’ Y="456" Z=X$+Y$ Print Z$ End 运行后，输出的结果是( )。A．显示出错结果B．123456C．579D．579
阅读下面的程序： Private Sub Command1_Click() For i=1 To 3 For j=1 To i For k=j To 3 x=x+1 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮，窗体上输出的结果是A．3B．9C．14D．21
有如下程序： DefStr X-Z X="123" Y="456"， Z=X$+Y$ Print ZS End 运行后，输出结果是( )。A．显示出错信息B．123456C．579D．579
阅读下列FORTRAN程序：MOIUH=N(5)+NdO)WRITE( *，‘(2X，15)，)MQIUH ENDFUNCTION N(K)N=0DOIO J=1,K N=N+J 10 CONTINUE RETURN END程序运行后的结果是：A. 65B. 85C. 90D. 70
阅读下列FORTRAN程序:INTEGER X(7)DATA X/4，5，7，8，10，12，11/DO 10 K=1，7IF(MOD(X(K),2).NE.0)THENS=A+X(K)N=N+1END IF10 CONTINUET=S/NWRITE(*,20)S,T20 FORMAT(2X,3F6，1)END 程序运行后的输出结果是：（A）12.0 7.7(B)47.0 6.7(C)34.0 8.5(D)57.0 11.4
阅读下列FORTRAN 程序： MQIUH=N(5)+N(10) WRITE(*,’(2X,15)’)MQIUH END FUNCTION N(K) N=0 DO 10 J=1,k N=N+J10 CONTINUE RETURN END程序运行后的结果是：（A）65 （B）85（C）90 （D）70
有程序：INTEGERFF（X，Y）=X／Y+XA=-2．0B=4．0B=B+F（A，B）WRITE（*，20）B20FORMAT（1X，F4．1）END此程序的运行结果是：（）A、1.0B、1.5C、2.0D、3.0
有程序：READ（*，100）A100FORMAT（3x，F6．2）WRITE（*，200）A200FORMAT（1x，F8．2）END当执行此程序时，从键盘输入1234567890↙，则程序的运行结果是：（）A、4567.89B、1234.56C、******D、1234.5
单选题阅读下列程序 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 BIGMIDDLEB *********C BIGMIDSMAD BIMIDSMAL
单选题阅读下列FORTRAN程序: CHARACTER*10 A, B*6 DO 10 I=1,10 A(I:I)=' ' 10 COUNTINUE A(1:5)='ABCDE' B='FGHIJK' A(4:9)=B WRITE(*,100) A 100 FORMAT(1X,A) END 程序运行结果是（）A ABCDEFGHIJB ABCDEGHIJKC ABCFGHIJKD BCDEFGHIJK
单选题阅读下列程序 LOGICAL L READ（*，*）A，B L=A.GT.B IF（L）THEN X=B+2*A ELSE X=B END IF WRITE（*，*）X END 使用键盘为上述程序输入两个初值4和3，其输出的X值是（）A 4.0B 3.0C 11.0D 10.0
单选题有程序：CHARATERX*2，Y*3，Z*4DATAX，Y，Z／‘AB’，‘CDE’，‘FGHI’／WRITE（*，100）X，Y，Z100FORMAT（1X，A1，A2，A3）END此程序的运行结果是：（）AABCDEFBACDFGHC******DABCDEFGHI
单选题阅读下列程序 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.0B 4.0C 2.OD 3.O
单选题阅读下列程序 K（X，Y）=X/Y+X A=-2.0 B=4.0 B=1.0+K（A，B） WRITE（*，10）B 10 FORMAT（1X，F4.1） END 程序运行结果是（）A-1.0B1.0C2.0D3.0
单选题有程序：READ（*，100）A100FORMAT（3x，F6．2）WRITE（*，200）A200FORMAT（1x，F8．2）END当执行此程序时，从键盘输入1234567890↙，则程序的运行结果是：（）A4567.89B1234.56C******D1234.5
单选题阅读下列程序 INTEGER M（3，3） DATA M/1，2，3，4，5，6，7，8，9/ WRITE（*，10）（M（3，J），J=1，3） 10 FORMAT（1X，3I2） END 程序运行结果是（）A2 5 8B3 6 9C4 5 6D7 8 9
单选题阅读下列程序 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.0B 5.0C 3.5D 1.5
填空题下列程序的运行结果是（）。 Program test Implicit none Integer::i Integer::a(5)=(/ (i, i=1,5) /) Integer::b(5)=0 Where (a3) b=a End where Write(*,”(5(i3,1x))”) b end
单选题阅读下列FORTRAN程序： INTRINSIC SIN， COS WRITE（*，*）FUN（SIN，30.0）/FUN（COS，30.0） END FUNCTION FUN（F，X） X=X*3.14159/180 FUN=F（X） END 程序运行结果是（）A sin30°的值B cos30°的值C tg30°的值D ctg30°的值
单选题有程序：INTEGERFF（X，Y）=X／Y+XA=-2．0B=4．0B=B+F（A，B）WRITE（*，20）B20FORMAT（1X，F4．1）END此程序的运行结果是：（）A1.0B1.5C2.0D3.0
单选题阅读下列FORTRAN程序： PI=3.14159265 WRITE（*，’（F7.4） ’）PI END 程序运行后输出结果是（）A 3.142B 3.1415C 0.31416D 3.1416
单选题阅读下列程序 INTEGER F F（X，Y）=X+Y A=-2.5 B=2.1 B=B+F（A，B） WRITE（*，’（F3.1）’）B END 程序运行的结果是（）A 1B 7C 2.1D 1.7
单选题阅读下列程序 N=0 DO 10 K=1，3 N =N+1 M=K*N 10 CONTINUE WRITE（*，’（1X，2I3）’）M，K END 程序运行结果是（）A 9 4B 9 3C 12 4D 12 3（#^）
单选题阅读下列程序 READ（*，*）K WRITE（*，100）K 100 FORMAT（I5） END 程序运行时输入初始值12345，那么显示结果是（）A 2345B 12345C ****D *****