|
SECOND |
|
!#49012
!数学でなく機械計算だけど、答が 10^-15 以下の端数を持たない条件があれば、 !同精度の近似値に、一瞬で収束。十進BASICで実行。結果∠DCB= 110 ° OPTION ARITHMETIC COMPLEX LET A=COMPLEX(0, 2) LET B=EXP(COMPLEX(0,-40*PI/180))+A LET D=A+5 DO LET C=SQR(3)*EXP(COMPLEX(0, PI+50*PI/180))+D LET BC=ABS(B-C) LET D=D-(BC-2) LOOP UNTIL BC=2 PRINT "∠DCB=";arg((B-C)/(D-C))*180/PI;"°" |
|
4月27日（月） 23:22:07
49020 |