以下程序执行后,输出的第一行是 (4) ,第二行是 (5) 。 PROGRAMmainIMPLICITNONEINTEGER::n REAL::x,p x=3.0; n=2 WRITE(,’("VALUE=",F6.2)’)p(x,n)x=2.0

admin2019-04-04  43

问题 以下程序执行后,输出的第一行是         (4)         ,第二行是         (5)         。
PROGRAMmainIMPLICITNONEINTEGER::n
REAL::x,p
x=3.0; n=2
WRITE(,’("VALUE=",F6.2)’)p(x,n)x=2.0; n=3
WRITE(,’("VALUE=",F6.2)’)p(x,n)ENDPROGRAM       main
!
RECURSIVEFUNCTIONp(x,n)RESULT(g)IMPLICITNONE
INTEGER::n
REAL::x,g
IF(n==0)THENg=1.0
ELSEIF(n==1)THENg=x
ELSE
g=((2n-1)xp(x,n-1)-(n-1)p(x,n-2))/nENDIF
ENDFUNCTIONp

选项

答案(4)VALUE=1300 (5)VALUE=1700

解析
转载请注明原文地址:https://jikaoti.com/ti/urO7FFFM
0

最新回复(0)