code.m

1clear all
2clc
3syms x
4f = input("Enter the upper curve f(x): ");
5g = input("Enter the lower curve g(x): ");
6L = input("Enter the limits of integration for x [a,b]: ");
7a = L(1);b = L(2);
8x1 = linspace(a,b,20);y1 = subs(f,x,x1);
9x2 = x1;y2 = subs(g,x,x2);
10Area = int(f-g,x,a,b);
11disp(['Area bounded by the curves f(x) and g(x) is ',char(Area)])
12plot(x1,y1);hold on;plot(x2,y2);hold off;
13xlabel('x-axis');ylabel('y-label');
14legend('f(x)','g(x)');grid on;