Quelques exemples

Pour écrire un programme, il est conseillé d'ouvrir un éditeur de programme avec le menu Add->Programme. Le menu Prog de l'éditeur permet d'entrer facilement les structures de programmation. On peut ensuite sauvegarder le texte du programme indépendamment de la session de travail pour l'utiliser ensuite dans une autre session de travail.

Voici un programme qui donne le quotient et le reste de la division euclidienne de 2 entiers en utilisant les fonctions iquo qui renvoie le quotient et irem qui renvoie le reste (c'est la fonction iquorem de Xcas).

idiv2(a,b):={ 
  local q,r;
  if (b!=0) {
    q:=iquo(a,b);
    r:=irem(a,b);
  }
  else {
    q:=0;
    r:=a;
  }
  return [q,r];
}:;

Saisissez cette fonction dans un éditeur de programme, testez-la (bouton OK) puis sauvegardez par exemple sous le nom idiv2.cxx. Vous pouvez utiliser cette fonction dans une ligne de commande, en tapant par exemple idiv2(25,15). Vous pourrez utiliser cette fonction dans une autre session Xcas, en utilisant la commande read("idiv2.cxx") ou en l'ouvrant depuis un éditeur de programme (et en le validant par OK).

Voici maintenant deux versions du calcul du PGCD de deux entiers, une version itérative, puis une version récursive.

pgcd_iteratif(a,b):={
 local r;
 while (b!=0) {
    r:=irem(a,b);
    a:=b;
    b:=r;
 }
 return a;
}:;

pgcd_recursif(a,b):={
 if (b==0) return a;
 return pgcd_recursif(b,irem(a,b));
}:;

Il arrive parfois qu'un programme ne fonctionne pas du premier coup comme prévu (!) Il est alors possible de l'exécuter en mode pas-à-pas pour le mettre au point, avec la commande debug. Pour plus de détails consulter le menu Aide->Interface. Par exemple, pour le programme idiv2, on lance la mise au point en tapant debug(idiv2(25,15)). On peut visualiser l'état des variables a,b,r avec le bouton watch et exécuter instruction par instruction avec le bouton sst.