var p: pinteger; pc: pchar; bi: BigInteger; begin assert(abs(e - System.Math.E)<0.0001); end.