Определение суммы значений и их долей. Turbo Basic

[junita]

Составить программу определения суммы значений ф-ции fd=x^(a+b)-c*SIN(x)^2 и доли каждого из значений в полученной сумме при изменении x от x0 до xn с шагом dx. Сумму нашла, а как найти доли не знаю

cls
 Input"Vvesti a, b, c cherez zapyatuyu",a,b,c
 Input"Vvesti XO,XN i shag DX",x0,xn,dx
 sum=0
 FOR x=x0 to xn step dx
 FD=x^(a+b)-c*SIN(x)^2
 sum=sum+FD
 next x
 PRINT sum
 END