Polskie Forum Użytkowników Debiana

Kod: Zaznacz cały

#!/bin/bash
    echo "PROGRAM DO OBLICZANIA DELTY"

    echo "Podaj A: "
    read A
    echo "Podaj B: "
    read B
    echo "Podaj C: "
    read C
    if ! [[ $A =~ ^-?[0-9]+(\.[0-9]+)?$ ]]; then
    echo "An invalid input"
    fi
    if ! [[ $B =~ ^-?[0-9]+(\.[0-9]+)?$ ]]; then
    echo "An invalid input"
    fi
    if ! [[ $C =~ ^-?[0-9]+(\.[0-9]+)?$ ]]; then
    echo "An invalid input"
    fi
    DELTA="$((B*B-4*A*C))"
    PIERW=`echo "scale=5 ; sqrt($DELTA)" | bc`
    CZYZERO=`echo "$DELTA==0" | bc`
    CZYWIEKSZE=`echo "$DELTA>0" | bc`
    echo "Delta wynosi: $DELTA , jej pierwiastek to: $PIERW"

    if [ "$CZYZERO" = 1 ]; then
        P0=`echo "scale5 ;(-1*$B)/(2*$A)" | bc`
        echo "Rownanie posiada jeden pierwiastek: $P0"
    elif [ "$CZYWIEKSZE" = 1 ]; then
        P1=`echo "scale=5 ;(-1*$B-$PIERW)/(2*$A)" | bc`
        P2=`echo "scale=5 ;(-1*$B+$PIERW)/(2*$A)" | bc`
        echo "Rozwnanie posiada dwa pierwiastki: $P1 i $P2"
    else
        echo "To rownanie nie posiada pierwiastkow"
    fi