小弟求助？如何用delphi编写计算表达式的程序？

1。如何编写能像编译器那样计算带有常有函数，包括多层括号嵌套的算式。
2，编写后，我像如何想那些智能的计算器，可以求那些不能开出有理数的根式，自动识别圆周率其他无理常数，尽量不用小数，用根式和分数，常数表示运算结果。
因为，我想编写这样的程序，以便更好的学好数学。
如果可以，可以发代码给我，本人保证未经作者同意，不公开代码。br_micro@ 谢谢?