Demonstrate how to define a type that behaves like an integer but has a lowest valid value of 1 and a highest valid value of 10. Include all bounds checking you need to write, or explain how the compiler or interpreter creates those bounds checks for you.

 
TYPE TipoUsuario
    nombre AS STRING * 15
    apellido AS STRING * 30
    edad AS INTEGER
END TYPE
 
DIM usuario(1 TO 20) AS TipoUsuario
 
usuario(1).nombre = "Juan"
usuario(1).apellido = "Hdez."
usuario(1).edad = 49
 
PRINT usuario(1).nombre, usuario(1).apellido, usuario(1).edad
 