Во-первых, у нас не рассматриваются запросы без указания языка программирования (или, как в данном разделе, среды программирования: Delphi? Pascal?), а во-вторых (и в главных!) - в любом случае и я не стану это решать, и коллег попрошу решений не выкладывать. Потому что перед нами - шаблонная задача на освоение азов программирования, абсолютно не требующая ни малейших мозговых усилий по изобретению способа решения: знай себе переводи формулы на язык программирования! Тупая черновая работа. И я не вижу, почему мы должны этим за Вас заниматься. Вот что, сударь, - хватит уже лоботрясничать и беритесь за ум, пока не поздно. Причем вот именно за собственный.
А вот когда появятся хоть какие-нибудь наработки и, соответственно, вопросы - тогда мы к Вашим услугам.
Успехов!