Aidez-moi : que calcule cette procédure

hakimelghe -  
hakimelghe Messages postés 2 Statut Membre -
Bonjour,
svp trés urgent je veut connaitre que calcule cette procedure en MAPLE (son role)

mystere:=proc(x,y)
local c,xtmp,q;
c:=NULL ;
xtmp:=x;
while xtmp >=y do
q:=trunc(xtmp/y);
c:=xtmp-q*y,c;
xtmp:=q
od;
RETURN([xtmp,c])
end;

voici des examples

mystere(21,4);
[1, 1, 1]

mystere(33,4);

[2, 0, 1]

mystere(38,5);

[1, 2, 3]
Configuration: Windows XP
Opera 9.80

4 réponses

  1. le père
     
    Il s'agit de l'écriture de x dans la base y
    258 s'écrit 258 en base 10 (2*100 + 5*10 + 8)
    5 s'écrit 101 en base 2 (1*4 + 0*2 + 1*1)
    et pour reprendre un de tes exemples
    33 s'écrit 201 en base 4 (2*16 + 0*4 + 1)
    1
    1. hakimelghe Messages postés 2 Statut Membre
       
      merci c gentil de ta part
      0
  2. le père
     
    Bonjour

    essaye :
    mystere (23,10)
    mystere (258,10)
    mystere (1234,10)
    puis
    mystere(1,2)
    mystere(2,2)
    mystere(3,2)
    mystere(4,2)
    mystere(5,2)
    mystere(6,2)
    mystere(7,2)

    Avec ces exemples, ça devrait te paraître évident
    0
  3. hakimelghe Messages postés 2 Statut Membre
     
    les derniers sont clairs mais les premiers sont encore flou

    mystere(1,2);
    [1]

    > mystere(2,2);

    [1, 0]

    > mystere(3,2);

    [1, 1]

    > mystere(4,2);

    [1, 0, 0]

    > mystere(5,2);

    [1, 0, 1]

    > mystere(6,2);

    [1, 1, 0]

    > mystere(7,2);

    [1, 1, 1]

    > mystere(23,10);

    [2, 3]

    > mystere(258,10);

    [2, 5, 8]

    > mystere(1234,10);

    [1, 2, 3, 4]
    0
  4. garion28 Messages postés 1545 Date d'inscription   Statut Membre Dernière intervention   408
     
    rajoute des commentaires pour ne pas oublier a quoi ca sert
    0