برنامه محاسبه و کنترل ابعاد صفحه ستون

سلام من يک برنامه برای طراحی base plate به زبان delphi نوشتم که اين برنامه شامل 3 فايل اجرایی ميباشد.
1-براي حالتی که فقط نیروی محوری باشد
2- حالتی که e کوچکتر از B/6 باشد.
3-حالتی که e بزرگتر از B/6 باشد.
اگه ممکن اين برنامه رو چک و اشتباهات اون را بگيد تا درصورت امکان برطرف کنم تا برنامه کاملی باشد.
فقط فایل 3 يک مشکل داره و اونم اینکه خود برنامه معادله درجه 3 را نميتواند حل کند براي استفاده ابتدا يک مقدار فرضی براي ان درنظر بگيريد سپس برنامه را اجرا کنيد سپس برنامه a1 a2 a3 را بشما ميده و شما با داشتن آنها معادله را حل کنيد و X جديد را به برنامه معرفی کنيد و بدون تغيير در داده هاي اولیه برنامه را يک باره ديگر اجرا کنيد.
با تشکر ميلاد.

همچنين ميشه واسه حل معادله با هر درجه اي با ايجاد يك لوپ با فرض اينكه متغير بسيار كوچك باشد ( مثلا 0.0000001 ) و با گام هاي مختلف به تقريب تا حد مورد نظر دست يافت .