On reprend l'exercice pr$$c$$dent$,$ mais cette fois$-$ci les termes du nombre hexad$$cimal sont enregistr$$s dans un tableau de string.

Exemples de tableaux de chaine de caract$$res pass$$e en argument :

$\backslash$table$[[A,"$S$","$E$"]]$

$\backslash$table$[[1,3,5,"$B$","$D$","4","$F$"]]$

Vous devez compl$$ter le sous$-$programme suivant :

Function comparaison$($deci As Integer, hexa$()$ As String$)$ As Integer

If deci $<mtext\; id="EditorElement\_1222807"></mtext><mn\; id="EditorElement\_1222808">0</mn>$ Then Return $$

Dim a As Integer

Din b As String

Dim i As Integer $=0$

Do

If i Then Return $1$

a $=$ deci Hod $16$

deci $=$ deci $\frac{\frac{?}{?}}{16}$

If $a0$ And $a9$ Then

b $=cstr(a)$

Elseif $a-10$ Then

b $="$A$"$

Elself $a=11$ then

b $="B"$

ElseIf $a=12$ Then

b $="C"$

Elself $a=13$ Then

$b="$D$"$

Elself $a-14$ Then

$b="E"$

Elself $a=15$ then

$b="$F$"$

End If

If en Return $1i=1+1$

Loop While deci $>0$

If $1$

Then Return

Return

End functio.