更多“INTEGE X READ *, N X=1 IF(N>=0…”相关的问题
第1题
下列程序运行后得到的图形是()。 [x,y]=meshgrid(1:5,1:6); z=5*ones(size(x)); surf(x,z,y);
点击查看答案
第2题
S=1.0 DO K=2,10,4 S=S+1/K ENDDO PRINT *,S END 程序的运行结果为______。
点击查看答案
第3题
DO N=10,20 NA=N/10 NB=MOD(N,10) IF (NA+NB .EQ. 10) THEN PRINT *, N ENDIF ENDDO END 程序的运行结果为______。
点击查看答案
第4题
INTEGER:: M(3,3),S=0 DATA M/1,2,3,4,5,6,7,8,9/ DO K=1,3 S=S+M(4-K,K) ENDDO PRINT*,S END 程序的运行结果为______。
点击查看答案
第5题
CHARACTER A,C READ*,A SELECT CASE(A) CASE('a':'z') C=CHAR(ICHAR(A)-32) CASE('A':'Z') C=CHAR(ICHAR(A)+32) CASE DEFAULT C=A END SELECT PRINT *,A,C END 如果从键盘输入E,则程序运行结果为______。
点击查看答案
第6题
INTEGER A,B,C,MAX PRINT*,"请输入三个整数" READ*,A,B,C MAX=A IF(B>MAX) MAX=B IF(C>MAX) MAX=C PRINT *, MAX END 从键盘上输入3,9,2后运行结果为_____.
点击查看答案
第7题
INTEGER S PRINT*,"输入学生成绩:" READ *,S IF (S<60) then print *,"不及格 " else *,"及格" *,"中" *,"良" *,'优' endif end>
点击查看答案
第8题
PARAMETER(N=4) INTEGER F I=1 F=1 DO WHILE(I<=n) f="F*I" i="I+1" enddo print*,f>
点击查看答案
第9题
设A的值为1.0,执行 程序段后B的值为3.0。 [A] IF(A <= 1.0)b="1.0" [b] b="1.0" if(a> 1.0)B=2.0 IF(A < 1.0)B=1.0 IF(A < 2.0)B=2.0 [C] B=1.0 [D] IF(A > =1.0)B=2.0 IF(A >= 1.0) B=2.0 IF(A >= 2.0)B=3.0 IF(A >= 2.0) B=3.0 IF(A <= 3.0) b="3.0<br"> A、B的值为2.0。
B、B的值为1.0。
C、B的值为3.0。
D、B的值为2.0。
点击查看答案