新しく発言する  EXIT  インデックスへ

多項式逆数


  多項式逆数 しばっち 2008/03/28 20:30:14 
  続き しばっち 2008/03/28 20:30:59 
Re: 多項式逆数  返事を書く  ノートメニュー
しばっち <dihjvcfsyu> 2008/03/28 20:30:59
続き


EXTERNAL SUB SINE(X())
!'SIN(X)
CALL CLR(X)
LET X(1)=1
LET T=1
FOR I=3 TO MAXLEVEL STEP 2
LET T=-T/(I-1)/I
LET X(I)=T
NEXT I
END SUB

EXTERNAL SUB COSINE(X())
!'COS(X)
CALL CLR(X)
LET X(0)=1
LET T=1
FOR I=2 TO MAXLEVEL STEP 2
LET T=-T/(I-1)/I
LET X(I)=T
NEXT I
END SUB
  多項式平方根 しばっち 2008/03/28 20:31:48 
   └続き しばっち 2008/03/28 20:32:38 

 インデックスへ  EXIT
新規発言を反映させるにはブラウザの更新ボタンを押してください。