Exemples
if ((a==10) or (a<b)) {b:=b-a;} else {a:=a-b;}
essaiif(a,b):={
if ((a==10) or (a<b)) {
b:=b-a;
} else {
a:=a-b;
}
return([a,b]);
};
essaisi(a,b):={
si ((a==10) or (a<b))
alors
b:=b-a;
sinon
a:=a-b;
fsi;
return([a,b]);
};
idivsi(a,b):={
local (q:=0),(r:=a);
if (b!=0){
q:=iquo(a,b);
r:=irem(a,b);
}
return([q,r]);
};
idivsi(a,b):={
local (q:=0),(r:=a);
si (b!=0)
alors
q:=iquo(a,b);
r:=irem(a,b);
fsi
return([q,r]);
};
Avec Xcas, on peut aussi utiliser un "case" qui se traduit par :
switch (<nom_de_variable>){
case val_de_la_variable : {
.....
break;
}
case val_de_la_variable : {
.....
break;
} default : {
...
}
}
Exemple :
s(a):={
local r;
switch(a) {
case 1 :{
r:=1;
break;
}
case 2 :{
r:=-1;
break;
}
default :{
r:=0;
}
}
return r;
}