По данным значениям аргументов a и b вычислить значение функции f(a,b). Паскаль

[shokoladka5013]

При решении задачи необходимо использовать механизм подпрограмм.
По данным значениям аргументов a и b вычислить значение функции f(a,b). При организации вычисления необходимо выявить сходные по своей схеме последовательности операций, различающиеся лишь операндами, и представить их в виде отдельных функций. Аргументы должны принадлежать области определения функции
f(a,b)=(1/а+1/b+1/a^2+1/b^2+1/a*b)/((a+b)+(a-b)+(a+b)^2+(a-b)^2+(a^2-b^2))
программку нужно сделать в паскале (оч срочно)

[D@rkD@iver]

сделаю за 100р