Exercice : Tableau

Dans le module tableau, vous devez utiliser les procédures remplirTab et afficherTab qui ont été réalisées dans le cours Liste de Langage.

Pour chaque procédure :

  • Codez en VBA dans un module nommé tableau

  • Codez la fonction ou la sous-routine

  • Codez un programme principal qui utilise votre procédure et éventuellement remplirTab et afficherTab.

  • Créer un bouton sur l'onglet Tableau

Question

Function MoyenneTab(tableau) as single

Retourne la moyenne des nombres d'un tableau.

Le programme principal demande un tableau et un nombre et affiche si le nombre appartient au tableau.

Question

Function AppartientTab(tableau, nombre as integer) as boolean

Retourne si le nombre appartient au tableau.

Question

Function PlaceTab(tableau, nombre as integer)

Retourne la ou les places de nombre dans le tableau.

Question

Sub EchangeTab(tableau, rang1 as integer, rang2 as integer)

Échange le contenu de deux cases du tableau.

Question

Function MaxTab(tableau) as integer

Retourne la place du max.

Question

Function ImpairTab(tableau) as integer

Retourne le nombre de chiffres impairs dans le tableau.

Question

Function Somme3(tableau) as integer

Retourne la somme des chiffres divisibles par 3 du tableau.

Question

Sub AfficheTab0(tableau)

Affiche le contenu du tableau jusqu'au nombre 0.

Question

Sub RemplaceDouble(tableau)

Remplace chaque nombre d'un tableau par son double

Question

Sub Remplace01(tableau)

Remplace chaque nombre du tableau par 0 s'il est pair, par 1 s'il est impair

Question

Sub RemplirTab2(tab_1, tab_2)

Remplie tab_1 avec le carré des nombres de tab_2

Question

Sub SommePI(tableau)

Affiche la somme des nombres pairs et la somme des nombres impairs du tableau.

Question

Sub AfficheTabPI(tableau)

Affiche les nombres impairs sur une ligne et les nombres pairs sur une autre.

Question

Sub AffichePuissance(tableau)

Affiche sur la première ligne, le premier chiffre à la puissance 1, sur la deuxième le deuxième à la puissance 2 etc.