contar numero de caracteres...

[oscarac]

buenos dias...
quiza sea que el cafe aun no hace efecto pero tengo este problema



Var _Espacios :integer;
Cadena := 'Hola';
_Espacios := Length(Cadena) / 2;

quiero calcular la mitad y cuando divido Cantidad entre 2 me sale un mensaje


[Pascal Error] Librerias_u.pas(458): E2010 Incompatible types: 'Integer' and 'Extended'


alguien sabe porque?

[duilioisola]

Prueba con esto:

Var _Espacios :integer;
Cadena := 'Hola';
_Espacios := Length(Cadena) div 2;


Para divisiones enteras debes utilizar el operador "div".
4 / 2 = 2.0 (Extended - Coma flotante, decimal o como quieras llamarlo)
5 / 2 = 2.5 (Extended - Coma flotante, decimal o como quieras llamarlo)
4 div 2 = 2 (entero)
5 div 2 = 2 (entero)

[oscarac]

creo que le faltaba azucar al café

gracias me funciono muy bien...

[ecfisa]

Hola.

Otra forma de calcular la mitad con números enteros:

_Espacios := Length(Cadena) shr 1;


Un saludo.