par WillyCagnes » 02 Fév 2014, 11:06
Bonjour
For n=1 to 20 //1ère boucle allant de la valeur n=1 à 20
U=100 //U=100 au depart
For i = 1 to n //2è boucle avec i =1 à n ( le mêm n que celui de la 1ère boucle)
U=-0,5*u+5 //on pose U= -0,5U+5
Locate i , 1 : print i ; u //à la position(i,1) : tu écris i puis U
Next i // fin de la boucle 2
Locate 30, 1 : print u //à la position(30,1) : tu ecris U
U=100 // on intialise U=100
I=0 // on initalise i=0
Do while iI=i+1 // on incrémente la valeur de I=i+1
U=-0,5*u+5 //n pose U= -0,5U+5
Locate i,25:print i;u //à la position (i,25) , on ecrit U
Loop // on reboucle la boucle1 Tant que
Locate 30,25:print u // à la position (30,25) on ecrit U
U=100 // on pose U=100
I=o // on pose I=i+1
Do while i<=n //2è boucle tant que i<=n
I=i+1 // on incrémente la valeur de I=i+1
U=-0,5*u+5 //on pose U= -0,5U+5
Locate i,50:print i;u // à la position (i,50) on ecrit i et U
Loop // on reboucle la 2è boucle Tant que
Locate 30,50:Print u // à la position (i,50) on ecrit i et U
Next n // on reboucle la 1ère boucle For
End // fin du programme