6 lines
103 B
ObjectPascal
6 lines
103 B
ObjectPascal
|
var p: pinteger;
|
||
|
|
pc: pchar;
|
||
|
|
bi: BigInteger;
|
||
|
|
begin
|
||
|
|
assert(abs(e - System.Math.E)<0.0001);
|
||
|
|
end.
|