FTP | CCD | Buscar | Trucos | Trabajo | Foros |
#1
|
|||
|
|||
random
tengo otro problema con el siguiente codigo:
lo que quiero es obtener un randomico entre 0 y 1 , segun eso evaluarlo de esta manera pero me da desde lo marcado con rojo que son tipos incompatibles sera el problema con el random? desde ya gracias randomize; u:= random(random(1)); if (u < 0.1) then N:=0 else if (0.1<= u < 0.2)then N:=1 else if (0.2<= u < 0.45)then N:=2 else if (0.45<= u < 0.75)then N:=3 else if (0.75<= u < 1) N=4; |
#2
|
||||
|
||||
Prueba cambiando el código por:
Edu |
#3
|
|||
|
|||
funciona gracias
gracias por la ayuda edu
|
#4
|
||||
|
||||
Puedes simplificar el código aún más:
aunque no entiendo muy bien el porqué del doble uso de random |
#5
|
|||
|
|||
thales
gracias por la sugerencia lo del random doble no me daba error solo queria asegurar la aleatoriedad pero ya se lo saque
|
#6
|
||||
|
||||
Otra cosa más que no te comenté antes: En el código anterior la variable N nunca llega a tomar el valor 4 porque el número aleatorio que generas siempre es menor que 1, así que el último if sobra.
Un saludo |
#7
|
||||
|
||||
Cita:
Cita:
Saludos!
__________________
delphi.com.ar Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla. |
|
|
|