Voir le sujet précédent :: Voir le sujet suivant |
Auteur |
Message |
MrBouLay
Inscrit le: 27 Nov 2004 Messages: 6
|
Posté le: 27 Nov 2004 17:36 Sujet du message: Petit probleme avec des carrés |
|
|
Bonjour, j'ai un petit probleme de fonctions et vu que je debute sur maple je n'arrive pas a trop à trouver la réponse a ma question .
Il s'agit en fait de creer une fonction capable de dire si un entier est un carré.
enfin voila j'attend avec impatience votre réponse qui me permettra d'avancer un peu ^_^
Mr Boulay. |
|
Revenir en haut de page |
|
|
ALS Invité
|
Posté le: 28 Nov 2004 8:59 Sujet du message: Re: petit problème avec des carrés |
|
|
Bonjour, je vais vous aider à l'aide de 2 procédures:
Un entier est un carré parfait si sa racine carrée est égale à la partie entière de sa racine carrée:
Code: |
> carre:=proc(n::nonnegint)
> evalb(sqrt(n)=floor(sqrt(n)))
> end proc:
> carre(24); carre(25);
false
true
|
Procédure donnant la liste des carrés parfaits de 0 à n, entier naturel fixé:
Code: |
> liste_carres:=proc(n::nonnegint)
> local k,L;
> L:=NULL:
> for k from 0 to n do
> if carre(k) then L:=L,k end if
> end do;
> [L]
> end proc:
>
> liste_carres(100);
[0, 1, 4, 9, 16, 25, 36, 49, 64, 81, 100]
|
A bientôt sans doute sur ce forum. |
|
Revenir en haut de page |
|
|
MrBouLay
Inscrit le: 27 Nov 2004 Messages: 6
|
Posté le: 28 Nov 2004 15:49 Sujet du message: |
|
|
Ba c'est super sympa! merci encore pour l aide que tu m as apporté.
Tu fais vraiment du bon travail et c est d'ailleurs toujours agéable de tomber sur des gens comme toi qui ont le savoir et veulent bien aidé des débutant comme nous! |
|
Revenir en haut de page |
|
|
MrBouLay
Inscrit le: 27 Nov 2004 Messages: 6
|
Posté le: 28 Nov 2004 16:01 Sujet du message: |
|
|
J'ai oublié de te demander la version de Maple que tu utilises. |
|
Revenir en haut de page |
|
|
ALS Invité
|
Posté le: 29 Nov 2004 12:14 Sujet du message: Re: pb de carrés |
|
|
Merci pour tes remarques encourageantes : j'utilise Maple 9.01
A une prochaine question. |
|
Revenir en haut de page |
|
|
|