Autorisation : Membre
Nb de messages : 4
Inscrit le : Mer 14 Avr 2010, 19:12
Posté le : Mer 14 Avr 2010, 19:15
Bonjour,
Je suis actuellement en 2nd et dans un dm on me demande de réaliser un programme affichant la table de multiplication d'un nombre demandé.
J'ai farfouillé un peu sur le net mais je n'est malheureusement pas trouvais ce que je cherchais.... Pouvais vous m'indiquer une solution ou une méthode pour arriver a faire mon programme ?
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Mer 14 Avr 2010, 22:40
Tout d'abord quel genre d'affichage désires tu pour écrire ta table ? Car afficher successivement des résultats pourrait suffir.
Voici le plus simple.
Code
prompt A
For(B,1,10
Disp A*B
pause
End
Après c'est une histoire d'affichage.
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Autorisation : Membre
Nb de messages : 4
Inscrit le : Mer 14 Avr 2010, 19:12
Posté le : Jeu 15 Avr 2010, 13:59
J'avais déjà pensé a un programme de ce type, malhereusement l'énoncé me demande d'afficher la table comme suis :
(Exemple avec la table de 3)
3*0=0
3*1=3
3*2=6
etc....
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Jeu 15 Avr 2010, 14:43
Je le ferais comme cela:
Code
ClrHome
prompt A
For(B,1,10
If B<9
Then
Output(B,2,"*
Output(B,1,A
Output(B,3,B
End
If B>8
Then
Output(B-8,11,"*
Output(B-8,10,A
Output(B-8,12,B
End
End
Pause
ClrHome
Output(1,1,"
Il faut le tester mais je pense que ça va marcher.
Autorisation : Membre
Nb de messages : 4
Inscrit le : Mer 14 Avr 2010, 19:12
Posté le : Jeu 15 Avr 2010, 15:20
Salut a toi,
Ton programme affiche bien 3*1, etc....
Mais cependant il me faut aussi qu'il affiche le résultat donc 3*1=3....
Une chose me trouble aussi, je ne comprend pas comment tu fais pour afficher les chiffres au endroits voulu ( Avec Output en utilisant B)
PS: si j'utilise 10 le signe * disparait ce que je trouve normale mais je ne suis pas sur si je dois allé jusque 10 voir au delà car l'énoncé n'est pas assez explicite a mon gout...
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Jeu 15 Avr 2010, 17:06
Oups, j'ai oublié le plus important pour le programme:
Code
ClrHome
prompt A
For(B,1,9
If B<9
Then
Output(B,2,"* =
Output(B,1,A
Output(B,3,B
Output(B,5,AB
End
If B>8
Then
Output(B-8,11,"* =
Output(B-8,10,A
Output(B-8,12,B
Output(8-B,14,AB
End
End
Pause
ClrHome
Output(1,1,"
