成员 后继功能

句法    成员 ( exp )

描述    成员 函数接受整数,字符或枚举值,并返回整数加一个,下一个字符或枚举中的下一个值。 例如, 成员 (7)是8。

例子    图灵计划的这一部分填满了数组 a 具有枚举值 绿色 , yellow, red, green, yellow, red, 等等。

        type colors : enum (  绿色 ,  黄色的 ,  红色的   )
        var a : array 1 .. 100 of colors
        var c : colors := colors . 绿色 
        for i : 1 .. 100
            a ( i ) := c
            if c = colors .  红色的   这 n
                c := colors .  绿色 
            else
                c :=  成员  ( c )
            end if
        end for
细节    你不能申请 成员 到枚举的最后一个值。

也可以看看    预见 , 降低 functions.