1樓：匿名使用者
program sinxx
implicit none
real*8::x,y
x=1.0d0
write(*,101)sinx(x)
101 format('sin(1)=',f22.18)write(*,100)cosx(x)
100 format('cos(1)=',f22.18)read(*,*)
contains
function sinx(x)result(y)implicit none
real*8,intent(in)::x
real*8::y,s
integer*4::i=1
y=0.0d0;s=x
do while(abs(s)>0.5e-16)y=y+s;i=i+2
s=-s*x*x/((i-1)*i)
enddo
end function sinx
function cosx(x)result(y)implicit none
real*8,intent(in)::x
real*8::y,s
integer*4::i=0
y=0.0d0;s=1.0d0
do while(abs(s)>0.5e-16)y=y+s;i=i+2
s=-s*x*x/((i-1)*i)
enddo
end function cosxend
vb題.輸入x值,按下列公式計算cos(x)。精度要求7位有效數字,最後一項<1e-7。編寫程式實現之。
c語言程式設計的問題 輸入精度 e 和 x，用下列公式求cos(x) cos(x) = x^0/0!－x^2/2!＋x^4/4!－x^6/6!＋……
2樓：匿名使用者
pow(x,y) 要求x>0，所以pow(-1,a/2)是錯的
來其實，符號用 k=k*(-1)就可以控制
源；x^n/n!bai=x^(n-2)*x*x/((n-2)!*(n-1)*n)也就是利用前項的結果du就可以求，zhi不需要每次分dao別求
編寫程式,要求輸入x的值,輸出y的值
用什麼語言啊大俠,用二進位制,彙編,c,c 及?用c語言回答。有一函式 編寫程式,要求輸入x 的值輸出y 的值。func 1 2 3 4對應四種要求 include int func1 int x int func2 int x return y int func3 int x int func4 ...
vb題 輸入x值,按下列公式計算cos x 。精度要求7位有效數字,最後一項1E 7。編寫程式實現之
program sinxx implicit none real 8 x,y x 1.0d0 write 101 sinx x 101 format sin 1 f22.18 write 100 cosx x 100 format cos 1 f22.18 read contains functio...
計算下列分段函式的值x的值由鍵盤輸入c語言輸入
如下bai include include int main else if x 10 else printf f result return 0 擴充套件zhi資料 c語言dao計算分段函式專值的簡單代屬碼 include include int main 如下copy include inclu...