FiveTech Support Forums

Alguien me puede hechar una mano con lo siguiente :

En VB :
Dim resultValue As Integer
      resultValue = 11 \ 4
      resultValue = 9 \ 3
      resultValue = 100 \ 3
      resultValue = 67 \ -3

  !! OJO CON EL OPERADOR   " \ "
  Divide dos números y devuelve un resultado de número entero.
  en el ejemplo anterior devuelven valores de 2, 3, 33 y -22

 Cual seria su equivalente en XHarbour ?.

  Por su atencion Gracias.

  Ricardo E. Guardado Flores.

resultValue = Int( 11 \ 4 )
resultValue = Int( 9 \ 3 )
resultValue = Int( 100 \ 3 )
resultValue = Int( 67 \ -3 )

Maestro:

No debería ser así ?

resultValue = Int( 11 / 4 )
resultValue = Int( 9 / 3 )
resultValue = Int( 100 / 3 )
resultValue = Int( 67 / -3 )

Saludos

Si, asi es. Me limite a copiar y pegar las lineas de Ricardo

Asi es, Estaba aplicando la funcion INT(x/i......)
Pero el resultado no era el mismo que VB asi que por eso mi pregunta.

Entonces:

VB

xNumber = (((37 + _
    ((512 - 448) \ 8)) \ _
    (512 \ 8) + 1) * _
    (512 \ 32))

EL valor de xNumber es 16 (Segun el Debugger de VB )

  XHB

xNumber := Int( ((( 37 + ;
( Int( ( 512 - 448) / 8)) ) / ;
( Int( 512 / 8)) ) + 1) * ;
( Int( 512 / 32)) )

   EL valor de xNumber es 27

Estoy aplicando mal la funcion INT(.....) ????????????????????????'

Ricardo E. Guardado Flores

De hecho, el resultado de ambas formulas es 27, estoy tratando de ver como debe ser para que te de 16

(int((37 +((512 - 448) / ) /(512 / + 1) *(512 / 32))

esto si da 16, revisa, que es lo que quieres hacer

Felicidad!!!