プチコン総合スレッド

350：桜：2012/03/28(水) 00:54:44 ID:MXV3k6w2: １．CLS
２．@STAT
３．?" /|"
４．?" / |"
５．?" C→/ |"←A
６．?"　　ーー"
７．?" ↑B"
８．?"*　求めたい辺を0としてね"
９．INPUT"辺Aは";A
１０．INPUT"辺Bは";B
１１．INPUT"辺Cは";C
１２．
１３．IF　C==0　GOTO@CX
１４．IF　B==0　GOTO@BX
１５．IF　A==0　GOTO@AX
１６．GOTO@STAT
１７．@CX
１８．C=A*A+B*B:PT=SQR(C)
１９．?"辺Cの値は、ルート;C"
２０．?"辺Cの値は、;TP"
２１．GOTO@STAT
２２．
23.@BX
24.B=C*CーB*B:TP1=SQR(B)
２５．?"辺Bの値は、ルート";B
２６．?"辺Bの値は";B
２７．
２８．@AX
２９．A=C*CーB*B:PT2=SQR(A)
３０．？"辺Aの値は、ルート;A"
３１．?"辺Aの値は、PT2"
３２．GOTO@STAT
　上のプログラムは、私と私のお友だちと作ったものです。
　三平方の計算をするためのものです。どなたでもいいですので、このプログラムの改造や補正していただけないでしょうか。

※書き込む際の注意事項はこちら

※画像アップローダーはこちら

（画像を表示できるのは「画像リンクのサムネイル表示」がオンの掲示板に限ります）

掲示板管理者へ連絡無料レンタル掲示板