// xcas version=1.5.0-37 fontsize=14 font=0 currentlevel=1 pixon=1
// fltk 7Fl_Tile 11 56 854 370 14 0
[
// fltk N4xcas7EditeurE 11 56 854 257 14 0
336 ,
divisiblePar3(n):={
local reste;
reste:=irem(n,3);// irem(n,3) renvoie le reste de la division euclidenne de n par 3
si reste==0 
  alors retourne true 
  else retourne false 
fsi
};
input("Quel est l'entier Г  tester ?",a);
si divisiblePar3(a)
  alors print(a+" est divisible par 3")
  sinon print(a+" n' est pas divisible par 3")
fsi;,
// fltk N4xcas10Log_OutputE 11 313 854 110 14 0
// InterprГЁte divisiblePar3Ј// SuccГЁsЈ// lors de la compilation divisiblePar3Ј8 n' est pas divisible par 3ЈЈTemps mis pour l'Г©valuation: 4.938Ј
,
// fltk N4xcas8EquationE 11 423 854 3 14 0 1
expr(" (n)-> Ј{ local reste; Ј  reste:=irem(n,3);  Ј  si reste=0 alors return(vrai) sinon return(faux) Ј  fsi;  Ј}",0),[1,8],1
]
,
// fltk 7Fl_Tile 11 428 854 97 14 0
[
// fltk N4xcas16Xcas_Text_EditorE 11 428 854 25 14 0
23 ,
debug(divisiblePar3(8)),
// fltk N4xcas10Log_OutputE 11 453 854 38 14 0
ЈTemps mis pour l'Г©valuation: 79.609Ј
,
// fltk N4xcas8EquationE 11 491 854 34 14 0 1
"debug(divisiblePar3(8)) dans divisiblePar3(8) instruction #3 erreur, essayez debug(divisiblePar3(8))Ј  Erreur: Type Argument Incorrect"
]
,
// fltk 7Fl_Tile 11 527 854 27 14 0
[
// fltk N4xcas16Xcas_Text_EditorE 11 527 854 26 14 0
0 ,
,
// fltk N4xcas10Log_OutputE 11 553 854 1 14 0

]
// context 684 giac archive
7 0 8 8 0 0 'cas_setup' 7 0 12 0 0 0
0 0 0
0 0 0
0 1 0
0 0 0
7 0 2 1 к-Ѓ™—q=
1 VзћЇТ<
0 12 0
7 0 4 0 2 0
0 100 0
0 0 0
0 25 0
0 0 0
0 1 0
0 0 0
0 1 0
8 0 0 'xyztrange' 7 0 16 1       $А
1       $@
1       $А
1       $@
1       $А
1       $@
1       $А
1       $@
1       $А
1       $@
1 ffffffцї
1 љ™™™™™с?
0 1 0
1         
1       р?
0 3 0
7 0 0 7 0 0 8 0 15 7 1 2 0 8 0
6 1 a 8 0 15 7 1 2 8 0 73 7 1 3 7 1 1 6 1 n 7 1 1 0 0 0
8 0 42 7 1 2 7 0 2 7 1 1 6 5 reste 7 1 0 7 32 2 8 0 15 7 1 2 8 0 0 irem 7 1 2 6 1 n 0 3 0
6 5 reste 8 0 -1 si 7 0 3 8 0 74 7 1 2 6 5 reste 0 0 0
8 0 43 0 1 6
8 0 43 0 0 6
6 13 divisiblePar3 8 0 15 7 1 2 0 1 0
6 2 ok 8 0 0 'xcas_mode' 0 0 0