十進BASICには、複素数演算機能があります。 四則、ABS(), ARG(), RE(), IM(), CONJ() 等の基本的な演算以外に SQR(), EXP(), LOG() などが使えます。
次のプログラムを実行して、その結果を理解しましょう。
complextest.bas |
OPTION ARITHMETIC complex LET I=SQR(-1) LET a=1+2*i LET b=COMPLEX(3,4) REM 本当は I=COMPLEX(0,1) の方が良いのかも... LET wa=a+b LET sa=a-b LET seki=a*b LET syou=a/b PRINT a,b PRINT wa,sa PRINT seki,syou LET z=(1+I*SQR(3))/2 PRINT re(z),im(z) PRINT z,CONj(z) PRINT ABS(z),arg(z)/PI PRINT EXP(i*PI/3) END |
残念ながら、複素数データの入力は出来ないので、 実部・虚部を入力してもらってから、まとめる必要があります。
INPUT "実部と虚部を入力してください": x,y z=COMPLEX(x,y) |