Ultimo Problema: Tipos De Variables!!

[azaagh]

es lo unico que me falta para terminar el programa :

tengo 2 variables de tipo integer y una real

Código Delphi [-]
var
cataque :integer;
vdefensa : integer;
robo : real;

y quiero realizar esta operacion

Código Delphi [-]
robo := (cataque / 5) - (vdefensa / 5);

cual es el problema?? pues que justo despues tengo un:

Código Delphi [-]
robo := (cataque / 5) - (vdefensa / 5);
case robo of
-99..0: x:=10;
....
...
end;

y el case me OBLIGA a que la variable sea ENTERA....

vamos, que si sabeis alguna funcion para convertir un real (delphi dice que el resultado es de tipo extendido ) en entero

PD: os preguntareis como he conseguido hacer un programa sin saber cosas basicas como esta....no?

[__marcsc]

Hola,

la función Trunc te devuelve la parte entera de un Real.
La función Round te lo redondea. No sé qué te interesará más para tu caso.

Saludos.

[cbrrr]

si la variable robo la has de usar en un case, por qué no la defines directamente como integer??

Código Delphi [-]
 var  
   cataque :integer;
   vdefensa : integer; 
   robo : integer;
 begin
   robo := (cataque div 5) - (vdefensa div 5);
   case robo of
     -99..0: x:=10;
     ....
     ....
   end;
 end;

Nota que también he cambiado el / por div