\vec{u}

u_2=

Nuevos vectores

u_1=

\vec{u}=

\vec{v}=

\vec{v}

Cambiar módulos y ángulo

Cambiar coordenadas

\vec{u}·\vec{v} =\left| \vec{u} \right| ·\left| \vec{v} \right| ·cos \; \alpha=

Ver plano

ver1 = false
mu = 7 (slider from 0 to 10, step 0.1)
P_2 = (1, 0, 0)
P = (4, 0, 0)
u = Vector((mu * P_2))
mv = 6 (slider from 0 to 10, step 0.1)
Q = (2, 1, 2)
a = Plane((0, 0), P, Q)
e = OrthogonalLine((0, 0), a)
α = 0.8410686705679303 rad (slider from 0 to 180°, step °)
Q_2 = Rotate((mv * P_2), α, e)
v = Vector(Q_2)
Q_1 = (0.6666666666666666, 0.3333333333333333, 0.6666666666666666)
CasillaDeEntrada2 = Textfield(Q)
CasillaDeEntrada1 = Textfield(P)
ejes = 0
α_1 = Angle(u, v)
xu = If(x(P)  <  0, "(" + (x(P)) + ")", "" + (x(P)))
yu = If(y(P)  <  0, "(" + (y(P)) + ")", "" + (y(P)))
zu = If(z(P)  <  0, "(" + (z(P)) + ")", "" + (z(P)))
zv = If(z(Q)  <  0, "(" + (z(Q)) + ")", "" + (z(Q)))
yv = If(y(Q)  <  0, "(" + (y(Q)) + ")", "" + (y(Q)))
xv = If(x(Q)  <  0, "(" + (x(Q)) + ")", "" + (x(Q)))
textope1: "\vec{u}·\vec{v}=" + (LaTeX[xu]) + "·" + LaTeX[xv] + "+" + LaTeX[yu] + "·" + LaTeX[yv] + "+" + LaTeX[zu] + "·" + LaTeX[zv] + "=" + LaTeX[(u * v)] + ""
textomodu: "\left| \vec{u} \right| =\sqrt{" + (LaTeX[xu]) + "^2+" + LaTeX[yu] + "^2+" + LaTeX[zu] + "^2}=\sqrt{" + LaTeX[Length[u]^(2)] + "}=" + LaTeX[Length[u]] + ""
textomodv: "\left| \vec{v} \right| =\sqrt{" + (LaTeX[xv]) + "^2+" + LaTeX[yv] + "^2+" + LaTeX[zv] + "^2}=\sqrt{" + LaTeX[Length[v]^(2)] + "}=" + LaTeX[Length[v]] + ""
textocoseno: "cos \; \alpha =\frac{" + (LaTeX[(u * v)]) + "}{" + LaTeX[Length[u]] + "·" + LaTeX[Length[v]] + "}=" + LaTeX[cos(α_1)] + " \; \; ; \; \; \alpha=" + LaTeX[α_1] + ""
b = OrthogonalPlane(Q_2, u)
A = Intersect(Line[(0, 0), P], b)
d = Segment((0, 0, 0), A)
textomu: "\left| \vec{u} \right| =" + (LaTeX[mu]) + ""
textomv: "\left| \vec{v} \right| =" + (LaTeX[mv]) + ""
c = Segment(Q_2, A)
texto2: "=" + (LaTeX[mu]) + "·" + LaTeX[mv] + "·" + LaTeX[cos(α)] + "=" + LaTeX[mu] + "·" + LaTeX[(mv * cos(α))] + "=" + LaTeX[(u * v)] + ""
texto3: "\vec{u}=" + (LaTeX[(mu * P_2)]) + " \; \; ; \; \; \vec{v}=" + LaTeX[Q_2] + ""
f = false