Voila j'ai récemment décidé de me mettre un peu a la programmation ; cependant je ne souhaitais pas recopier bêtement les lgnes de codes proposées ici, j'ai voulu écrire un ptit quelque chose moi même.
Ce sont en fait 2 programmes :
*Le premier permet de passer nimporte quelle fraction sur 100 : vous avez
60 000 000 de Français dont 45 000 000 en couple (valeurs prises au hasard hein :p), combien de % de Français vivent en couple?
Code
:Output(4,2,"POURCENTAGES"
:Pause
:EffEcr
:Input("DENOMINATEUR?",A
:Input("DIVISEUR?",B
:((100*A)/B)->C
:Disp "A / B ="
:Disp "C / 100"
:Disp "C ="
:Disp C
Le second programme applique la réciproque du Théorème de Pythagore (si (Coté_le_plus-long)² = (Autre_cote_1)²+(Autre_coté_2)², alors le triangle est rectangle - mais vous le savez ça hein? ^^ )
Code
:EffEcr
:Output(2,4,"PYTHAGORE"
:Pause
:EffEcr
:Input "COTE LE PLUS LONG?",A
:Input "AUTRE COTE 1?",B
:Input "AUTRE COTE 2?",C
:If A^2=B^2+C^2
:Then
:Disp "LE COTE LE"
:Disp "PLUS LONG EST"
:Disp "HYPOTENUSE"
:Disp "ET MESURE"
:Disp A
:Else
:Disp "LE COTE LE"
:Disp "PLUS LONG"
:Disp "N'EST PAS HYPOTENUSE"
:End
:
Voila je vous avais prévenu, c'est simle ^^ m'enfin faut un début a tout.
ALors qu'en pensez vous? Y a des bases a revoir?
P.S : Les objectifs sont aussi un peu Terre -a-terre mais je ne sais pas faire grand chose d'autre de "simple" a programmer en 2nde.
Autorisation : Membre
Nb de messages : 891
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Jeu 18 Oct 2007, 18:44
C'est déjà bien de t'être mis à la programmation, en plus en faisant tes propres programmes
Au passage, sache que tu peux oublier les guillemets à la fin des lignes, et que tu peux enchaîner les Disp en un seul.
En clair, voici ton code fait au minimum d'octet (=> Ratuss au sens de la syntaxe bien sur, je ne parle pas de l'organisation^^):
Code
:EffEcr
:Output(2,4,"PYTHAGORE
:Pause
:EffEcr
:Input "COTE LE PLUS LONG?",A
:Input "AUTRE COTE 1?",B
:Input "AUTRE COTE 2?",C
:If A²=B²+C²
:Then
:Disp "LE COTE LE","PLUS LONG EST","L'HYPOTENUSE","ET MESURE",A
:Else
:Disp "LE COTE LE","PLUS LONG","N'EST PAS L'HYPOTENUSE
:End
