031-raizcuadrada-algoritmo

fuera

Número

Fuera de rango

Siguiente

Anterior

num = 432567 (slider from -5 to 500000, step 0.1)
m = If(num < 0, true, If[num > 999999, true, false])
ent(x) = x - fractionalPart(x)
C = (-40, 80)
e = Line(C, xAxis)
D = Point(e)
s = LineBisector(C, D)
F = Point(s)
G = Point(e)
I = Point(e)
d = OrthogonalLine(I, e)
f = Segment(C, F)
g = Segment(F, D)
h = Segment(D, G)
J = Point(d)
i = Segment(I, J)
j = Line(F, h)
A = Intersect(j, i)
B = Point(j)
k = Segment(A, B)
CasillaDeEntrada1 = Textfield(num)
aa = If(m ≟ true, 0, ent(num / 10000))
bb = If(m ≟ true, 0, ent((num - (aa * 10000)) / 100))
cc = If(m ≟ true, 0, num - (aa * 10000) - (bb * 100))
n = 1 (slider from 0 to 15, step 1)
a: ent(sqrt(aa))
texto3: "" + (LaTeX[a]) + ""
raac: a^(2)
res1: aa - raac
texto5: "" + (LaTeX[res1]) + ""
E = (-14.145895885228985, 46.38843844359897)
H = (2.6623488197375194, 46.60969932454411)
sa = Segment(E, H)
dob1: (2 * a)
texto7: "" + (LaTeX[dob1]) + ""
res2: (res1 * 100) + bb
b: ent(((-20 * a) + sqrt((400 * a^(2)) + (4 * res2))) / 2)
dobabporb: (((dob1 * 10) + b) * b)
texto4: "" + (LaTeX[raac]) + ""
texto9: "" + (LaTeX[dobabporb]) + ""
K = (-11.053518433979693, 15.293000248730523)
L = (18.57592249445142, 15.276124484746008)
sb = Segment(K, L)
res3: res2 - dobabporb
texto10: "" + (LaTeX[res3]) + ""
texto11: "" + (LaTeX[b]) + ""
dob2: (2 * ((10 * a) + b))
texto12: "" + (LaTeX[dob2]) + ""
res4: (res3 * 100) + cc
c: ent(((-10 * dob2) + sqrt(((10 * dob2))^(2) + (4 * res4))) / 2)
dobabcporc: (((dob2 * 10) + c) * c)
texto15: "" + (LaTeX[dobabcporc]) + ""
M = (-5.428023711043911, -17.61974748994826)
N = (33.198090089341875, -17.61974748994826)
l = Segment(M, N)
res5: res4 - dobabcporc
texto16: "" + (LaTeX[res5]) + ""
texto13: "" + (LaTeX[res4]) + ""
d1: ent(num / 100000)
d2: ent((num - (d1 * 100000)) / 10000)
d3: ent((num - (d1 * 100000) - (d2 * 10000)) / 1000)
d4: ent((num - (d1 * 100000) - (d2 * 10000) - (d3 * 1000)) / 100)
d5: ent((num - (d1 * 100000) - (d2 * 10000) - (d3 * 1000) - (d4 * 100)) / 10)
d6: ent(num - (d1 * 100000) - (d2 * 10000) - (d3 * 1000) - (d4 * 100) - (d5 * 10))
texto6: "" + (LaTeX[res2]) + ""
texto8: "" + (LaTeX[dob1]) + "" + (LaTeX[b]) + "·" + (LaTeX[b]) + "=" + (LaTeX[dobabporb]) + ""
texto14: "" + (LaTeX[dob2]) + "" + (LaTeX[c]) + "·" + (LaTeX[c]) + "=" + (LaTeX[dobabcporc]) + ""
texto1a: "" + (LaTeX[d1]) + "" + (LaTeX[d2]) + "."
texto1c: "" + (LaTeX[d5]) + "" + (LaTeX[d6]) + ""
o: n + 1
p: n + 1
q: n + 1
r: n + 1
t: n + 1
u: n + 1
v: n + 1
w: n + 1
a_1: n + 1
texto1: "" + (LaTeX[d3]) + "" + (LaTeX[d4]) + ","
texto17: "," + (LaTeX[c]) + ""
Número: num / 100
texto18: "Paso " + n + ""
texto2: "" + (LaTeX[aa]) + "" + (LaTeX[bb]) + "," + (LaTeX[cc]) + ""