ras le cul des maths - Page 24

nan, nan. Ta boucle while est trés bien, pourtant
Essayes de mettres tous le code dans une boucle Loop...EndLoop (While et If compris) et remplace stop par exit

Bah...non.

Ca vient peut être des instructions qui suivent (Prompt)?

Au fait, ca veut dire koi Loop?

c un peu pareil que while en fait, regarde ds la notice

Ça fait un petit moment que je ne suit plus le topic...
Vous en êtes où ?

Parceque si c'est toujours à propos d'un Tron // Snake, je vais en faire un petit comme démo de Vertel

Bon alors voila:
G un prog de math tout nase en cours de creation, dont mon but pour l'instant et d'afficher mon programme d'infos (c un otre un prog) en appuyant sur apps.

pour ca g fait:

->t
While t=0
getkey()->t
EndWhile
If t=264top
If t=265:main/infob()

Et je l'ai placé au début du prog. Mais ca marche pas. Et je sias pas pourkoi!

Voilà!

t'a pas oublié le 0->t au début (enfin il n'apparait pas ds ta source)
sinon normalement ça marche...

Tu peux répondre à mon post #693 stp ?

Ben tu veux que je te dise koi de plus!

Sinon ben ya bien le 0 au début.

Mais derriere ma boucle while g une instruction Prompt. Est ce que ca empecherait d'ouvrir l'otre prog?

Ya plus de tron, enfin j'lai arreté pour le moment parce que les profs m'assassine niveau DS en ce moment alors g repris les progs de maths

Je voulais que tu me dise si tu continuais ton tron, donc visiblement non...

Ton problème il est pas normal, l'algo est très bien (sauf le '/' mais j'imagine que tu t'es gourré et que tu voulais mettre un '\'...

Donc met la source complete et explique ce qui se passe au lieu de dire "ça marche pas"

ok.

()
Prgm
probasinfob()
0»t
While t?264
getkey()»t
If t=265:maininfob()

ClrHome:ClrIO
disp "Resolutions de la loi binomiale:","","Entrez vos valeurs"

Prompt n,p,k
ClrIO
Disp "P(X)=","",nCr(n,k)*((p)^k)*(1-(p))^(n-k),"",approx(nCr(n,k)*((p)^k)*(1-(p))^(n-k))
Pause

ClrIO
Disp "E(X)=","",n*p
Pause

ClrIO
Disp "V(X)=","",n*p*(1-p),"",approx(n*p*(1-p))
Pause

ClrIO
Disp "S(X)=","",§(n*p*(1-p)),"",approx(§(n*p*(1-p)))
PauseispHome
DelVar n,p,k,t,u
EndPrgm

Voila.
Mais je comprend pas la je trouve pas d'erreurs!

RAAAAAAAHHHHH

Il se passe koi ? Message d'erreur ? Plantage ? Rien ??? Explique un peu !

oups!

Ben en fait kan j'appuie sur esc sa passe a l'etape suivante (comme enter), et kan j'appuie sur apps ben ca fé rien!

En gros c comme si cca servait a rien! (d'ailleurs ca sert a rien! )

Mouais... Va pê falloir attendre le retour de MacIntoc ou Microbug, parceque là je n'ai pas la moindre idée du résultat que tu cherche à obtenir...

Serieux?

G deux progs:

-le premier nommé bino sert a calculer la proba, l'ecart type, ect....
-le deuxieme nommé infob qui est tout simplement un programme qui contient des infos sur la loi binomiale (formules, inconnues...)

Kan je lance bino, au début je balance dans infob, puis je retourne faire mes calculs. Mais ce qui serait bien, c que je puisse aller a n'importe kel moment dans infob en appuyant sur la touche [apps].

Voila normalement ca devrait etre plus clair.

Méeeuh! Keske je peux dire de plus?

Kan j'appuie sur apps, ca devrait m'envoyer dans infob (t'as compris ce que c infob?).

Vouala c ossi simple que ca!

Mais c pas ça, mais bon j'ai pas tout suivi moi... j'ai même rien suivi du tout !!!

Kan j'appuie sur apps, ca devrait m'envoyer dans infob
> Bah oué mais bon c pas très précis ça !!!
La réponse à ta question, c'est if key=265:main\infob()... Donc je pense que tu voulais avoir autre chose

La réponse a la question c ca.

Mais mon probleme c que ca je l'ai écrit dans mon prog, mais ca ne fait rien et apparement ya pas d'erreurs!

Encore un probleme a la con!

Pfou... Je comprends rien à ton pb...

C koi que tu veux faire ? Qu'a tout moment du prog si on appuie sur APPS ça en lance un autre ? Bah alors il te faut mettre des tests partout...

Ben ouais c ca.

P.S. Ca sert à rien je sais mais c pour voir comment on fait.

le coup de a tout moment si tu appuie sur apps ca lace machinchose c'est impossible à coder....

Tout est possible...
mais c chiant !!!

nan, c pas possible de la faire pour des gros programmes sans multiplier les même tests .. mais si tu rajoutes le mm test toutes les 20 lignes de code, ca marche

en Qbasic ça serait possible

ben c "vraiment" possible si tu déroules ton programme dans une seule boucle .. et en multipliant les tests d'intérruptions

oué mais bon si tu es obligé de tester toutes les 2 instructions, on est pas sorti de l'auberge

Ok g compris j'vais chercher un autre point que j'ai pas encore vu!

lol

C'est moi ou vous racontez que des bétises
Il lui suffit de mettre son test juste aprés un getkey(). Ca suffit largement
S'il a 3 getkey(), il met 3 tests juste aprés. S'il n'en a qu'1, il met un seul teste. Pas la peine d'en mettre 50000

C'est toi
lui il veut pouvoir le faire à tout moment , même si il n'y a pas de getkey ...

Mais si y a pas de getkey(), tu peut toujours appuyer sur APPS, il se passerat rien