Voilà mon algo pour TI:
:Prompt A,B
:A/B->C
:iPart(C)->Q ( c'est la paritie entière)
:fPart(C)xB->r (la partie decimale multiplié par le diviseur)
: Dsip "Q=",Q,"r=",r
J'aimerai bien savoir si quelqu'un savait comment traduire cet algorithme
sans utiliser les parties enière et décimale (pour la décimale je sais m'en passer) mais avec la fonction int .
C'est pour ecrire le programme sur casio pour les gens de ma classe. Merci.
si t as Q
a-Q*b = reste
Oui ça je sais mais comment faire pour se passer de la fonction partie entière et utiliser int que je ne connais pas? Je sais trouver un reste, c'est simple, mais ça l'est moins pour le quotient.
a moins de faire une boucle de 1 a n pour Q (et tester si Q*b> a) pour trouve le Q
je vois pas
Personne n'a de casio?
t as pas la fonction int ??
meme sur une calculatrice datant de 20 ans deja je l ai moi
Envoyé par jdh
Je suis pas sur mais ca doit fonctionner pour les nombres entiers.Code:Prompt A,B :A/B->C :round(C,0)->D :if C<D :D=D-1 :round((C-D)*B),0)->E :Disp "A=","B*"D,"+",E
--Yankel Scialom
Salut,
j'ai une 2 casio, une recente et un vieux modele, dans les 2 cas la fonction int y est, parfois elle peut etre appelée intg...
Si tu peux pas l'utiliser, tu va etre obligé de faire une petite boucle
Je me suis mal exprimé, moi j'ai une TI ou mon preogramme fonctionne, mon but est de traduire ce programme sur casio sachant que A et B sont des eniters relatifs.
j ai une TI 58c ca date de 25 ans il y a la fonction int decimale precision a N chiffre
donc tu la forcement
utilise la foction modulo
a mod b -> donne le reste
[a - (a mod b) ] / b ...... donne le quotient
Hello,
Je crois que la fonction frac existe sur certaines Casio (identique à fpart)Code:int (A/B) -> Q A - Q*B -> R
Bonjour
je propose
?->A
?->B
While B/=(egal barré)0
intg(A/B)->Q(la faut mettre un triangle)
A-B*Q->R(triangle)
B->A
R->B
Whileend
A
