网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
单选题
阅读下列程序 X=0.618 WRITE（*，’（E12.4）’）X END 程序运行后显示结果是（）
A
.6180
B
6.180E-01
C
.0618E+01
D
.6180E+00
参考答案
参考解析
解析：
暂无解析
更多 “单选题阅读下列程序 X=0.618 WRITE（*，’（E12.4）’）X END 程序运行后显示结果是（）A .6180B 6.180E-01C .0618E+01D .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 END
FUNCTION N(K)
N=0
DOIO J=1,K N=N+J 10 CONTINUE RETURN END
程序运行后的结果是：
A. 65
B. 85
C. 90
D. 70
考题
阅读下列FORTRAN程序:
INTEGER X(7)
DATA X/4，5，7，8，10，12，11/
DO 10 K=1，7
IF(MOD(X(K),2).NE.0)THEN
S=A+X(K)
N=N+1
END IF
10 CONTINUE
T=S/N
WRITE(*,20)S,T
20 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+J
10 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此程序的运行结果是：（）A
ABCDEFB
ACDFGHC
******D
ABCDEFGHI
考题
单选题阅读下列程序 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.0B
1.0C
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
考题
单选题阅读下列程序 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 程序运行结果是（）A
2 5 8B
3 6 9C
4 5 6D
7 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此程序的运行结果是：（）A
1.0B
1.5C
2.0D
3.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
*****
热门标签
最新试卷