All pastes #612825 Raw Edit

tymop

public shellscript v1 · immutable
·published 2007-07-10 17:20 UTC
rendered paste body
#  Nb[i]              | Div#  Nbsous[i]          \ Result#    Nb[i+1]          \#    Nbsous[i+1]      \#                     \#             resteNb[1]=$1Div=$2#echo "nombre   " $Nb#echo "Diviseur " $Divreste=0result=0Ncalcul=0# écriture de la 1ere ligneNcalcul=$Ncalcul+1texte[$Ntexte]=${Nb[Ncalcul]}# trouve le nombre de chiffre du nombre à diviserlevel=0a=0while [ $a -le ${Nb[Ncalcul]} ]dolevel=$(($level + 1))let "a=10**$level"done# echo $level "chiffres"# Détermine la partie à diviserlevel_act=$levelNb_act=0while [ $Nb_act -lt $Div ]dolevel_act=$(($level_act - 1))let "Nb_act=${Nb[Ncalcul]}/(10**$level_act)"#echo $level_act "=>" $Nb_actdoneResult[$Ncalcul]=$(($Nb_act/$Div))Nb_sous[$Ncalcul]=$((${Result[Ncalcul]}*$Div))texte[$Ncalcul]=${Nb_sous[Ncalcul]}Ncalcul=$Ncalcul+1# Affichage du calculNtexte=0for Ntexte in 0 1 2 3 4doecho ${texte[Ntexte]}doneecho ${Result[1]}