有程序:DIMENSIONx(3,3)READ(*,*)xCALLSSl(x(1,2))ENDSUBROUTINESSl(x)DIMENSIONx(3)WRITE(*,*)x(2)END当输入1、2、3、4、5、6、7、8、9时,此程序执行后的输出结果为:()
对任意输入的x,READ(*,*)xK=SIN(x)WRITE(*,*)KEND此程序执行后K的值为:()
下列程序执行后的输出结果为()。 CHARACTER9*C C=’1234567890’ CALLSS(C) END SUBROUTINESS(X) CHARACTERX*2 WRITE(*,*)X END
有程序:LOGICALLL=.TRUE.READ(*,*)xIF(x.LT.0)THENL=.FALSE.ELSEWRITE(*,*)xENDIFIF(.NOT.L)WRITE(*,*)-xEND执行两次以上程序,若运行中的输入值分别为2.5和-1.0,则两次运行结果分别是:()
有程序:READ(*,*)xY=0.0IF=(xGT.0.0)THENY=1.0ELSEIF(x.GE.150)THENY=2.0ELSEY=3.0ENDIFWRITE(*,*)YEND当输入150时,此程序执行后的输出结果为:()
下面程序段中循环语句的循环次数是()。 For x=10 To 1 Step -3 Write(x) Next x
有程序:READ(*,100)A100FORMAT(3x,F6.2)WRITE(*,200)A200FORMAT(1x,F8.2)END当执行此程序时,从键盘输入1234567890↙,则程序的运行结果是:()
当输入1.5,2.5,3.5,4.0下列程序执行后的输出结果为()。 DIMENSIONA(2,2) READ(*,*)A SUM=0 DO10I=1,2 DO20J=I,2 K=A(I,J)*I*J 10A(1,2)=K WRITE(*,*)A(2,1) END
有程序:F(X,Y)=X/Y+XY=-2.0X=4.0X=1.0*F(Y,X)WRITE(*,*)XEND此程序的运行结果是:()
有程序:F1(x)=2.0/(1.0+x)F2(Y)=F1(Y)*Y+1.0A=F1(1.0+F2(1.0)WRITE(*,10)A10FORMAT(1x,E8.2)END此程序执行后的输出结果为:()
程序gramtraparea dataa,b/10,5/ y(x)=1*x+1 S=(y B.+yA.)*abc(b-a)/2 write(*,*)’S=’,S end 执行程序后,最接近S的值为()
执行语句“Write#1,234;-34.56,"hello";Date”后,相应文件内被写入()。
有程序:INTEGERFF(X,Y)=X+YA=-2.0B=4.0B=1.0+F(A,B)WRITE(*,‘(1X,F3.1)’)BEND此程序的运行结果是:()
当输入10,20时,下列程序执行后的输出结果为()。 READ(*,*)IX,IY A=100.0 IF(IX/IY.GT.0)THEN A=1.0 ELSEIF(IX/IY.LT.0)THEN A=-1.0 ELSE A=0.0 ENDIF WRITE(*,*)A END
当执行以下程序段时()x=-1;do{x=x*x;}while(!x);
当a = 1, b = 3, c = 5, d = 4时,执行完下面一段程序后x的值是_____。 if ( a < b) if(c < d) x = 1; else if (a < c) if(b < d) x = 2; else x = 3; else x = 6; else x = 7;
当a=1,b=3,c=5,d=4时,执行完下面一段程序后x的值是()。main(){int m=5;if(m++>5)printf(\%d\,--m);elseprintf(\%d\,m++);}
下列代码的运行结果是______var x = 1;function test() {var x = 2;y = 3;document.write(x);}test();document.write(x);document.write(y);
设有定义: float x=123.4567; ,则执行下列语句后的输出结果是 printf()/100.0);
阅读下列FORTRAN程序:READ(*,10)A,B,C10FORMAT(1X,F3.1,2X,2F3.2)WRITE(*,*)BEND如果在执行该程序时从键盘输入1234567890↙(其中↙为回车键)则运行后输出的B值为:()。
程序F(X)=1.01*(X+3.0)FF(X)=4.0*F(X)+1.1255WRITE(*,100)FF(5.0)100FORNAT(1X,E9.3)END上述程序
有程序:F(X,Y)=X/Y+X Y=-2.0 X=4.0 X=1.0*F(Y,X) WRITE(*,*)X END 此程序的运行结果是: A.2.5 B.
8、当a=1,b=2,c=4,d=3时,执行完下面一段程序后x的值是()。 if(a<b) if(c<d) x=1; else if(a<c) if(b<d) x=2; else x=3; else x=4; else x=5;
当执行以下程序段时x=-1;do{x=x*x;}while (!x)