ПОМОГИТЕ РЕШИТЬ ЗАДАЧКУ НА ПАСКЛЕ, По пределам Опции

[Рома]

e- это эпсилонт. очень маленькое число
При заданном значении x и e вычислите сумму s(x,e), прекратив вычисленияБ когда очередной член по абсолютной величи станет меньше е. При том же значении х вычислите функцию y(x). Близость значений s(x,e) и y(x) указывает на правельность вычисления. Так же выводить на экран скока было произведенно операций вычисления, и выводит на экран если достигнута точность то writeln (' точность достигнута') а если нет то Writeln ('точность не достигнута'). Точность сравнивается по близости значений s(x,e) и y(x)

Ппожалуйста напишите ету задачку, если не трудно плиииииииииз, а то времени вообще нету колоквиум на носу =)