Types Ada：如何枚举由整数和其他类型组成的类型？

例如，我想创建一个表示所有等级卡（即2-10、杰克、皇后、国王和王牌）的类型

我想这样做：

    type Rank is (2,3,4,5,6,7,8,9,10,Jack,Queen,King,Ace);

但我得到了这个错误：

    identifier expected

你不能

枚举类型声明中的列表由标识符和/或字符文本组成。在该上下文中不能有整数文本

您可以使用表示子句指定用于表示枚举数的值，但我认为这不是您想要的

只需使用标识符：

type Rank is (R2,R3,R4,R5,R6,R7,R8,R9,R10,Jack,Queen,King,Ace);

---

可以声明两种帮助器类型和一种组合的帮助器类型：

包混合\u枚举\u和\u整数为
类型整型值的范围为1。。10;
类型枚举_值为（杰克、皇后、国王、Ace）；
类型对象是私有的；
函数“+”（项：整数值）返回对象；
函数“+”（项：枚举_值）返回对象；
函数“+”（项：对象）返回整数值；
函数“+”（项：对象）返回枚举值；
函数“=”（左：整数值；
右：对象）返回布尔值；
函数“=”（左：枚举值；
右：对象）返回布尔值；
私有的
类型状态为（未初始化、整数、枚举）；
类型对象（状态：States:=未初始化）为
记录
案例状态为
未初始化时=>null；
当Integer=>I时：整数值；
当枚举=>E时：枚举值；
终例；
结束记录；
结束混合枚举和整数；

谢谢您的回答。