IV atsiskaitymas daugybos lentele

dialog --title "Daugybos lentele" \
--inputbox "Iveskite skaiciu" 0 0 2>e.txt
kint=$?
sk=`cat e.txt`
case $kint in
0)
    for ((i = 1; i<=10; i++))
    do
        ats=`expr $i * $sk`
        echo "$i x $sk = $ats" >> a.txt
    done
    dialog --title "Daugybos lentele" \
    --backtitle "$kint" \
    --infobox "`cat a.txt`" 0 0;
    rm -f a.txt
    rm -f e.txt
;;
1)
    rm -f a.txt
    rm -f e.txt
exit ;;

255)
    rm -f a.txt
    rm -f e.txt
exit ;;
esac