Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- dialog --title "Antroji programa" \
- --menu "Pasirinkite punkta" 0 0 4 \
- Lyginiai_skaiciai "Bus atspausdinti visi lyginiai sekos skaiciai" \
- Nelyginiai_skaiciai "Bus atspausdinti visi nelyginiai sekos skaiciai" \
- Visi_skaiciai "Bus atspausdinti visi sekos skaiciai" \
- Visi_skaiciai_atbuline_tvarka "Bus atspausdinti visi sekos skaiciai atbuline tvarka" 2>temp.txt
- kint=$?
- x=`cat temp.txt`
- case $kint in
- 0) case $x in
- Lyginiai_skaiciai)
- dialog --title "Lyginiai skaiciai" \
- --inputbox "Iveskite sekos stabdymo numeri" 0 0 2>temp.txt
- zero=$?
- case $zero in
- 0)
- x=`cat temp.txt`
- for((i=2; i<=$x;i=i+2))
- do
- echo -n "$i ">>temp.txt
- done
- dialog --title "Lyginiai skaiciai" \
- --infobox "Lyginiu skaiciu seka: `cat temp.txt`" 0 0
- ;;
- 1) exit;;
- 255) exit;;
- esac;;
- Nelyginiai_skaiciai)
- dialog --title "Nelyginiai_skaiciai" \
- --inputbox "Iveskite sekos stabdymo numeri" 0 0 2>temp.txt
- zero=$?
- case $zero in
- 0)
- x=`cat temp.txt`
- for((i=1; i<=$x;i=i+2))
- do
- echo -n "$i ">>temp.txt
- done
- dialog --title "Nelyginiai skaiciai" \
- --infobox "Nelyginiu skaiciu seka: `cat temp.txt`" 0 0
- ;;
- 1) exit;;
- 255) exit;;
- esac;;
- Visi_skaiciai)
- dialog --title "Visi_skaiciai" \
- --inputbox "Iveskite sekos stabdymo numeri" 0 0 2>temp.txt
- zero=$?
- case $zero in
- 0)
- x=`cat temp.txt`
- for((i=1; i<=$x;i=i+1))
- do
- echo -n "$i ">>temp.txt
- done
- dialog --title "Visi skaiciai" \
- --infobox "Visu skaiciu seka: `cat temp.txt`" 0 0
- ;;
- 1) exit;;
- 255) exit;;
- esac;;
- Visi_skaiciai_atbuline_tvarka)
- dialog --title "Visi_skaiciai)i" \
- --inputbox "Iveskite sekos stabdymo numeri" 0 0 2>temp.txt
- zero=$?
- case $zero in
- 0)
- x=`cat temp.txt`
- for((i=$x; i>=1;i=i-1))
- do
- echo -n "$i ">>temp.txt
- done
- dialog --title "Visi skaiciai" \
- --infobox "Visu skaiciu seka: `cat temp.txt`" 0 0
- ;;
- 1) exit;;
- 255) exit;;
- esac;;
- esac;;
- 1)
- exit;;
- 255)
- exit;;
- esac
- rm -f temp.txt
Advertisement
Add Comment
Please, Sign In to add comment