SSG42

【機能】

    2次方程式の解を求める


【使用形式】

    CALL  SSG42(ZA,ZB,ZC,X,IR)


【引数説明】

    ［INPUT］
        ZA, ZB, ZC : 2次方程式の係数（ZA≠0）

    ［OUTPUT］                      
        X(2)       : 実根   +----+   
                            | X1 |   
                            +----+   
                            | X2 |   
                            +----+   
        IR       : リターンフラグ  
                      0 ; 解なし     
                      1 ; 重根       
                      2 ; 2根       
                     -1 ; 入力エラー 

【機能説明】

    ・2次方程式ax**2+bx+c=0（a≠0）の解を求める。
    ・ZA=0の時、IR=-1を出力する。