我尝试使用变体记录,如下面的陈述所示:
Type paytype=(salaried, hourly);
Var employee: record
Id: integer;
Dept: array [1...3] of char;
Age: integer;
Case payclass: paytype of
Salaried (monthlyrate: real; stardate: integer);
Hourly (hourrate: real; reg: integer; stardate: integer);
Hourly (hourrate: real; reg: integer; overtime: integer);
现在,我正在考虑它将使用的空间。我尝试在下图中为它绘制一个记忆表示。
我假设整数:2字节,真实:6字节,字符:1字节。
所需空间总量是多少?是17字节还是18字节?
专用于标签的内存大小(Payclass)是什么?