question!!!!

question!!!! - Programmation

Marsh Posté le 03-01-2002 à 16:36:21    

program Test ;
var i, u : integer ;  
    v : array[1:3] of boolean ;
    b : boolean ;
BEGIN
FOR I := 1 to 3 do
     begin
     why('Entree la valeur de U : ';) ; readln(U) ;
     if U mod 3 = 0 then V[I] := true
     else V [I] := false ;
     end ;
END.
 
 
 
 
 
a l exe de ce prog lorsque l on montre succesivement les valeur 25 12 et 16 qui a t il ds grand V?
a quoi sert la variable grand B?
 
 
avec delphi!!!


---------------
/!\ FORUM KILEBIEN /!\
Reply

Marsh Posté le 03-01-2002 à 16:36:21   

Reply

Marsh Posté le 03-01-2002 à 16:36:57    

:)
 
Certes.


---------------
Ratures - Cuisine
Reply

Marsh Posté le 03-01-2002 à 16:37:24    

Oh my god  [:thesphinx]

Reply

Marsh Posté le 03-01-2002 à 16:38:25    

25 : False
12 : True
16 : False


---------------
Ratures - Cuisine
Reply

Marsh Posté le 03-01-2002 à 16:39:43    

Et B apparemment ne sert à rien.


---------------
Ratures - Cuisine
Reply

Marsh Posté le 03-01-2002 à 16:39:56    

Topacdebiere a écrit a écrit :

program Test ;
var i, u : integer ;  
    v : array[1:3] of boolean ;
    b : boolean ;
BEGIN
FOR I := 1 to 3 do
     begin
     why('Entree la valeur de U : ';) ; readln(U) ;
     if U mod 3 = 0 then V[I] := true
     else V [I] := false ;
     end ;
END.
 
 
 
 
 
a l exe de ce prog lorsque l on montre succesivement les valeur 25 12 et 16 qui a t il ds grand V?
a quoi sert la variable grand B?
 
 
avec delphi!!!  




 
tu es fatigué toa hein?   :D


---------------
Si j'etais Dieu, et ben j'croirai pas en moi..Et si j'etais moi, et ben j'me mefierai
Reply

Marsh Posté le 03-01-2002 à 16:40:20    

program Test ;
var i, u : integer ;  
   v : array[1:3] of boolean ;
   b : boolean ;
BEGIN
FOR I := 1 to 3 do
    begin
    why('Entree la valeur de U : ';) ; readln(U) ;
    if U mod 3 = 0 then V[I] := true
    else V [I] := false ;
    end ;
END.
 
> à rien comme ton proG

Reply

Marsh Posté le 03-01-2002 à 16:50:39    

en faite des que c divisible par 3 ba c false  
et des que ca n est pas divisble pas 3 c juste
 
ok
 
 
JE vous remerci de votre aide a tous
 :jap:  :jap:


---------------
/!\ FORUM KILEBIEN /!\
Reply

Marsh Posté le 03-01-2002 à 16:53:27    

v(1)= false
v(2)= true
v(3)= false
 
et b ne sert à rien... de plus essaye ça et le résultat doit être le même tout en étant plus simple...
 
program Test ;  
var i, u : integer ;  
   v : array[1:3] of boolean ;  
BEGIN  
FOR I := 1 to 3 do  
    begin  
    why('Entree la valeur de U : ';) ; readln(U) ;  
    V[I] := U mod 3  
    end ;  
END.


---------------
Je suis schizo, et moi aussi..
Reply

Marsh Posté le 03-01-2002 à 16:57:34    

Fredaxe a écrit a écrit :

v(1)= false
v(2)= true
v(3)= false
 
et b ne sert à rien... de plus essaye ça et le résultat doit être le même tout en étant plus simple...
 
program Test ;  
var i, u : integer ;  
   v : array[1:3] of boolean ;  
BEGIN  
FOR I := 1 to 3 do  
    begin  
 
    why('Entree la valeur de U : ';) ; readln(U) ;  
    V[I] := U mod 3  
    end ;  
END.  




 
 
OUAIS mais en faite c une probleme qu il te pose et fau le resoudre donc peu pas changer le prog
 :(


---------------
/!\ FORUM KILEBIEN /!\
Reply

Marsh Posté le 03-01-2002 à 16:57:34   

Reply

Marsh Posté le 03-01-2002 à 17:00:45    

Ah oki, scuz...  :jap:


---------------
Je suis schizo, et moi aussi..
Reply

Marsh Posté le 03-01-2002 à 17:05:25    

Fredaxe a écrit a écrit :

Ah oki, scuz...  :jap:  




 
merci bcp
 :jap:


---------------
/!\ FORUM KILEBIEN /!\
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed