ADT Complex{
數據對象：D={r,i | r,i為實數}
數據關系：S={<r,i>}
基本操作：
InitComplex(&C,re,im)
操作結果：構造一個復數C，實部為re，虛部為im。
DestoryComplex(&C)
初始條件：復數C存在。
操作結果：銷毀復數C。
Get(C,k,&e)
初始條件：復數C存在，1<=k<=2。
操作結果：用e返回C的第k元的值。
Put(&C,k,e)
初始條件：復數C存在，1<=k<=2.
操作結果：將C的第k元改為e。
IsAscending(C)
初始條件：復數C存在。
操作結果：如果復數C的兩個元素按升序排列，則返回1，否則返回0.
IsDesending(C)
初始條件：復數C存在。
操作結果：如果復數C的兩個元素按降序排列，則返回1，否則返回0.
Max(C,&e)
初始條件：復數C存在。
操作結果：用e返回復數C中兩個元素值較大的一個。
Min(C,&e)
初始條件：復數C存在。
操作結果：用e返回復數C中兩個元素值較小的一個。
} ADT Complex
ADT RationalNumber{
數據對象：D={s,m | s,m為自然數，且m!=0}
數據關系：S={<s,m>}
基本操作：
……
}ADT RationalNumber