pictogram Auteur: Patrick Biker
Date: 18 mars 2006
Maj : 21 Mars 2015

Exemples évolués

Chaque exemple montre une utilisation pratique de la fonction du WLangage.

Quand plusieurs syntaxes sont possibles, chacune est illustrée indépendamment.

Revenir à la page des exemples évolués


Le code suivant permet de calculer le déterminant d'une matrice. Le nom de la matrice est saisi par l'utilisateur dans un champ de saisie (NomMatrice).

On considère que la matrice a été préalablement créée. L'existence de la matrice est testée avec MatExiste . Le nombre de colonnes de la matrice doit être égal au nombre de lignes de la matrice.



--Code de clic sur BtnDéterminant
// Déclaration des variables
ResDéterminant est un réel
// Teste l'existence de la matrice
SI MatExiste(NomMatrice) = Vrai ALORS
   // Nb. colonnes de la matrice = Nb. lignes de la matrice ?
   SI MatNbColonne(NomMatrice) = MatNbLigne(NomMatrice) ALORS
      // Calcul du déterminant
     
ResDéterminant = MatDéterminant (NomMatrice)
      SI ResDéterminant <> 0 ALORS
         Info("La valeur du déterminant est : "+ResDéterminant)
      SINON
         // Erreur ?
         SI Erreur(MatErreur(NomMatrice)) = 0 ALORS
            Info("Le déterminant est nul")
         SINON
            // Affichage du message d'erreur
           
Erreur(ErreurInfo(errMESSAGE))
         FIN
      FIN
   SINON
      Info("Le nombre de colonnes n'est pas égal au nombre de lignes")
   FIN
SINON
   Info("La matrice n'existe pas")
FIN