b

a

Integralna  suma ,  n=4

b = 4 (slider from 2.5 to 4, step 0.1)
a = 1 (slider from 1 to 2.5, step 0.1)
c = 2.75 (slider from a to b, step 0.05)
f(x) = x^(2) / 8
B: (b, 0)
A: (a, 0)
n = 8 (slider from 1 to 100, step 1)
GornjaSuma = UpperSum(f, x(A), x(B), n)
DonjaSuma = LowerSum(f, x(A), x(B), n)
razl: GornjaSuma - DonjaSuma
text1: "Gornja suma = " + GornjaSuma + ""
text2: "Donja suma = " + DonjaSuma + ""
C: (c, 0)
D: (x(C), f(x(C)))
a_1 = Segment(C, D)
F: (x(A), f(x(A)))
c_1 = Segment(F, A)
G: (x(B), f(x(B)))
d = Segment(G, B)
text3: "Razlika  = " + (LaTeX[razl]) + ""
g = Function(f, x(A), x(B))
e = true
h = true
potez1 = AttachCopyToView(PolyLine[(6.006718086950661, 4.3894356145803295), (6.048898013652269, 4.3894356145803295), (6.101622922029279, 4.3894356145803295), (6.1438028487308864, 4.3894356145803295), (6.185982775432493, 4.3894356145803295), (6.249252665484906, 4.3894356145803295), (6.2914325921865135, 4.3894356145803295), (6.333612518888121, 4.3894356145803295), (6.386337427265131, 4.3894356145803295), (6.439062335642141, 4.3894356145803295), (6.49178724401915, 4.3894356145803295), (6.54451215239616, 4.3894356145803295), (6.639416987474777, 4.3894356145803295), (6.692141895851787, 4.3894356145803295), (6.734321822553395, 4.3894356145803295), (6.787046730930404, 4.3894356145803295), (6.839771639307414, 4.3894356145803295), (6.8924965476844235, 4.3894356145803295), (6.9663114194122375, 4.3894356145803295), (7.019036327789247, 4.3894356145803295), (7.071761236166257, 4.3894356145803295), (7.124486144543266, 4.3894356145803295), (7.166666071244874, 4.3894356145803295), (7.219390979621884, 4.3894356145803295), (7.272115887998893, 4.3894356145803295), (7.314295814700501, 4.3894356145803295), (7.388110686428314, 4.3894356145803295), (7.451380576480727, 4.3894356145803295), (7.4935605031823345, 4.3894356145803295), (7.535740429883941, 4.3894356145803295), (7.588465338260952, 4.3894356145803295), (7.630645264962559, 4.3894356145803295), (7.683370173339569, 4.3894356145803295), (7.746640063391981, 4.3894356145803295), (7.79936497176899, 4.3894356145803295), (7.852089880146, 4.3894356145803295), (7.90481478852301, 4.3894356145803295), (7.946994715224617, 4.3894356145803295), (7.989174641926225, 4.3894356145803295), (8.031354568627833, 4.3894356145803295), (8.105169440355647, 4.3894356145803295), (8.147349367057254, 4.3894356145803295), (8.221164238785068, 4.3894356145803295), (8.263344165486675, 4.3894356145803295), (8.305524092188284, 4.3894356145803295), (8.34770401888989, 4.3894356145803295), true], 1, (-1.3220441774536857, -0.3768961027013044), (11.258118961300827, 5.359573928717299), (0, 544), (1193, 0))
E = (1.5, 0)
H = (2, 0)
I = (3, 0)
J = (3.5, 0)
K: (x(E), f(x(E)))
L: (x(J), f(x(J)))
M: (x(I), f(x(I)))
N: (x(H), f(x(H)))
i = Segment(K, E)
j = Segment(N, H)
k = Segment(M, I)
l = Segment(L, J)
O: (1, y(K))
P: (1.75, y(K))
Q = (1.75, 0)
T: (1.75, y(N))
U: (2.5, y(I))
S: (2.5, y(N))
poligon2, t, s, u, q_1 = Polygon(T, S, U, Q)
poligon1, a_2, o, p, q = Polygon(A, O, P, Q)
R: (2.5, y(M))
V = (3.25, 0)
W: (3.25, y(M))
Z: (3.25, y(L))
A_1: (4, y(L))
poligon3, u_1, r, w, v = Polygon(U, R, W, V)
poligon4, b_1, a_3, z, v_1 = Polygon(B, A_1, Z, V)
Integralna = false