IV atsiskaitymas antra užduotis

dialog --title  "Skaiciu sekos" \
--menu "Pasirinkite: " 0 0 4 \
Lyginiai_skaiciai "Bus atspausdinti sekos lyginiai skaiciai" \
Nelyginiai_skaiciai "Bus atspausdinti sekos nelyginiai skaiciai" \
Visi_skaiciai "Bus atspausdinti visi sekos skaiciai" \
Visi_skaiciai_atvirksciai "Bus atspausdinti visi sekos skaiciai atvirkstine tvarka" \
2>laikinas_failas.txt
pasirinkimas=`cat laikinas_failas.txt`
case $pasirinkimas in
Lyginiai_skaiciai)
dialog --title "Lyginiai skaiciai" \
--inputbox "Iveskite sekos nutraukimo skaiciu" 0 0 2>laikinas_failas2.txt
kint=$?
skaicius=`cat laikinas_failas2.txt`
    case $kint in
    0) for ((i=1; i<$skaicius; i++))
    do
        if (($i%2 == 0))
        then
            echo "$i" >> a.txt
        fi
    done
    dialog --title "Lyginiai skaiciai" \
    --msgbox "Lyginiu skaiciu seka: `cat a.txt`" 0 0;
    rm a.txt ;;
    1) rm a.txt
    exit ;;
    255) rm a.txt
    exit ;;
    esac ;;
Nelyginiai_skaiciai)
dialog --title "Nelyginiai skaiciai" \
--inputbox "Iveskite sekos nutraukimo skaiciu" 0 0 2>laikinas_failas2.txt
kint=$?
skaicius=`cat laikinas_failas2.txt`
        case $kint in
        0) for ((i=1; i<=$skaicius; i++))
        do
                if (($i%2 != 0))
                then
                        echo "$i" >> a.txt
                fi
        done
        dialog --title "Nelyginiai skaiciai" \
        --msgbox "Nelyginiu skaiciu seka: `cat a.txt`" 0 0;
        rm a.txt ;;
    1) rm a.txt
    exit ;;
    255) rm a.txt
    exit ;;
    esac ;;
Visi_skaiciai)
dialog --title "Visi skaiciai" \
--inputbox "Iveskite sekos nutraukimo skaiciu" 0 0 2>laikinas_failas2.txt
pasirink=$?
skaicius=`cat laikinas_failas2.txt`
case $pasirink in
0)
for ((i = 1; i<= $skaicius; i++))
do
echo "$i" >> a.txt
done
dialog --title "Skaiciu seka" \
--msgbox "Skaiciu seka: `cat a.txt`" 0 0;
rm a.txt ;;
1) rm a.txt
exit;;
255) rm a.txt
exit;;
esac ;;


Visi_skaiciai_atvirksciai)
dialog --title "Seka atbulai" \
--inputbox "Iveskite sekos nutraukimo skaiciu" 0 0 2>failas.txt
pasirink=$?
skaicius=`cat failas.txt`

case $pasirink in

0) for ((skaicius; skaicius>=1 ; skaicius--))
do
echo "$skaicius" >> a.txt
done
dialog --title "Seka atbulai" \
--msgbox "Atbuline seka: `cat a.txt`" 0 0;
;;
1) exit;;

255) exit;;

esac;;
esac