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
:(
Fredaxe
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.
topacdebiere
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:
bac
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
mandrin0
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
Prems
Et B apparemment ne sert à rien.
Prems
25 : False
12 : True
16 : False
thesphinx
Oh my god [:thesphinx]
Prems
:)
Certes.
topacdebiere
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?
