新しく発言する EXIT インデックスへ
二次関数

  二次関数 ニコール・パックマン 2005/06/22 16:35:08 
  間違えました。最後から四行目は ニコール・パックマン 2005/06/22 16:38:00 

  二次関数 ニコール・パックマン 2005/06/22 16:35:08  ツリーへ

二次関数 返事を書く
ニコール・パックマン 2005/06/22 16:35:08
コンピューター用の二次関数を見つけました。

PRINT "x1は?"
INPUT XI
PRINT "yは1?"
INPUT YI
PRINT "xは2?"
INPUT XII
PRINT "yは2?"
INPUT YII
PRINT "x3は?"
INPUT XIII
PRINT "y3は?"
INPUT YIII
LET AYI=YI
LET AYII=YII
LET AYIII=YIII
1 LET B=(AYII-AYI)/(XII-XI)
LET C=AYI-B*XI
LET A=(AYIII-(B*XIII+C))/XIII^2
LET TYI=A*XI^2+B*XI+C
LET TYII=A*XII^2+B*XII+C
LET TYIII=A*XIII^2+B*XIII+C
LET AYI=YI/TYI*AYI
LET AYII=YII/TYII*AYII
LET AYIII=YIII/TYIII*AYIII
IF YI=TYI AND YII=TYII AND YIII=TYIII THEN GOTO 2 ELSE GOTO 1
PRINT "aは",A
PRINT "bは",B
PRINT "cは",C
END

  間違えました。最後から四行目は ニコール・パックマン 2005/06/22 16:38:00  ツリーへ

Re: 二次関数 返事を書く
ニコール・パックマン 2005/06/22 16:38:00
間違えました。最後から四行目は
2 PRINT "aは",A
です。


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