clear all

syms x

p3 = diff(1-3*x^2-5*x^3+8*x^4)
p4 = diff(diff(cos(6*x+7)))
p5 = subs(diff(nthroot(1+5*x^2-2*x^3-7*x^4,6)),x,5.8)

syms t
p6 = subs(diff((2*(5/(3-(5+t)))),2),t,5.5)
p7 = int((6*x^2+8*x+2)*(cos(5*x+3)))
p8 = int(cos(7*x+6),6,30)

syms f(x)
f(x) = (8*x+4+(3/x))
p10 = f(2)+subs(diff(f(x)),3)
p11= (subs(diff(f(x)),-3)-6*(subs((diff(f(x),2)),7)))
p12 = diff((9*x+6)*f(x))
p13 = simplify(int((9*x+8+(8*x+3)*f(x))))

g = @(x) 1+4.*x.^2-6.*x.^3-5.*x.^4

p15 = simplify((diff(g(x))+(g(7*x+6))))
p16 = subs(diff(g(sin(x))^(1/3),2),x,5)
p17 = int(g(x),0.08,0.27) + int(x*g(8*x+6),0.09,0.40)

syms y(t)
p18 = dsolve(diff(y)+(y/t)==(3*t+7+cos(t)))

syms h(t)
p19 = dsolve(diff(h(t))+9*cos(t)==h(t),h(5)==0)

p20 = fplot(3*x^2+7*x+4)
p21 = 0
for (x = 2:2:536)
    p21 = p21 + x;
end
p22 = 1
while (4^p22 < 10^29)
    p22 = p22+1;
end
p23 = 21
for (x = 1:1:42)
    p23 = p23 + (4^x/13^(x+1));
end
p24 = 7
while (p24 < 199781258)
    p24 = p24^4.4 + 7.28;
end