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

多項式逆数

　　多項式逆数 しばっち 2008/03/28 20:30:14 
　　├続き しばっち 2008/03/28 20:30:59 
　　└多項式平方根 しばっち 2008/03/28 20:31:48 
　　　└続き しばっち 2008/03/28 20:32:38 

Re: 多項式平方根	返事を書く ノートメニュー
しばっち <dihjvcfsyu> 2008/03/28 20:32:38
続き EXTERNAL SUB MUL(Y(),X()) OPTION BASE 0 DIM C(MAXLEVEL) FOR J=0 TO MAXLEVEL FOR I=0 TO MAXLEVEL-J LET C(I+J)=C(I+J)+Y(I)*X(J) NEXT I NEXT J CALL COPY(Y,C) END SUB 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

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