CURSO: DINÁMICA Programa para realizar transformaciones matriciales de vectores
!"POR# Din$mica%Matrices&' (!)IN *OCA* +,-,r,R,.,/,z0 +,-,r,R,.,/,z0 *OCA* #+0 *OCA* #-0 *OCA* Rect,Rect.,Rect/, Rec t,Rect.,Rect/,Rectz0 Rectz0 *OCA* Cil,Cilr,Cil+,Cilz0 Cil,Cilr,Cil+,Cilz0 *OCA* !sf,!sfR,!sf+,!sf-0 *OCA* c0 PRIN#&'0 C1OOS!&c,2Ingrese el tipo de transformaci3n2, 24' Rectang5lares 6 Cil7ndricas2, 28' Cil7ndricas 6 Rectang5lares2, 29' Cil7ndricas 6 !sfricas2, 2;' !sfricas 6 Cil7ndricas2, 2<' Rectang5lares 6 !sfricas2, 2=' !sfricas 6 Rectang5lares2'0 CAS! I> c??4 #1!N INPU#&+'0 I NPU#&+'0 INPU#&@Rect.,Rect/,Rectz,2Bect INPU#&@Rect.,Rect/,Rectz,2Bector or en coordenadas rectang5lares2'0 Rect:?Rect.,Rect/,Rectz0 #+:?COS&+',SIN&+',E,6SIN&+',COS&+',E,E,E,40 Cil:?#+FRect 0 MS)(O"&2!l vector en coordenadas cil7ndricas ser$: 2GCil'0 R!#URN&Cil'0 !ND0 I> c??8 #1!N INPU#&+'0 I NPU#&+'0 INPU#&@Cilr,Cil+,Cilz,2Be INPU#&@Cilr,Cil+,Cilz,2Bector en coordenadas cil7ndricas2'0 Cil:?Cilr,Cil+,Cilz0 #+:?COS&+',SIN&+',E,6SIN&+',COS&+',E,E,E,40 Rect:?#RN+'FCil0 MS)(O"&2!l vector en coordenadas rectang5lares ser$: 2GRect'0 R!#URN&Rect'0 !ND0 I> c??9 #1!N INPU#&-'0 I NPU#&-'0 INPU#&@Cilr,Cil+,Cilz,2Bector INPU#&@Cilr,Cil+,Cilz,2Bector en coordenadas cil7ndricas2'0 cil7ndricas2' 0 Cil:?Cilr,Cil+,Cilz0
#-:?COS&-',E,SIN&-',E,4,E,6SIN&-',E,COS&-'0 !sf:?#-FCil0 MS)(O"&2!l vector en coordenadas esfricas ser$: 2G!sf'0 R!#URN&!sf'0 !ND0 I> c??; #1!N INPU#&-'0INPU#&@!sfR,!sf+,!sf-,2Bector en coordenadas esfricas2'0 !sf:?!sfR,!sf+,!sf-0 #-:?COS&-',E,SIN&-',E,4,E,6SIN&-',E,COS&-'0 Cil:?#RN-'F!sf0 MS)(O"&2!l vector en coordenadas cil7ndricas ser$: 2GCil'0 R!#URN&Cil'0 !ND0 I> c??< #1!N INPU#&+'0 INPU#&-'0 INPU#&@Rect.,Rect/,Rectz,2Bector en coordenadas rectang5lares2'0 Rect:?Rect.,Rect/,Rectz0 #-:?COS&-',E,SIN&-',E,4,E,6SIN&-',E,COS&-'0 #+:?COS&+',SIN&+',E,6SIN&+',COS&+',E,E,E,40 !sf:?-F#+'FRect0 MS)(O"&2!l vector en coordenadas esfricas ser$: 2G!sf'0 R!#URN&!sf'0 !ND0 I> c??= #1!N INPU#&+'0 INPU#&-'0 INPU#&@!sfR,!sf+,!sf-,2Bector en coordenadas esfricas2'0 !sf:?!sfR,!sf+,!sf-0 #-:?COS&-',E,SIN&-',E,4,E,6SIN&-',E,COS&-'0 #+:?COS&+',SIN&+',E,6SIN&+',COS&+',E,E,E,40 Rect:?#RN-F#+'F!sf0 MS)(O"&2!l vector en coordenadas rectang5lares ser$: 2GRect'0 R!#URN&Rect'0 !ND0 !ND0 !ND0
CURSO: DINÁMICA Belocidad / aceleraci3n relativa
!"POR# Din$mica%Relativo&' (!)IN *OCA* Aa,Aa.,Aa/,Aaz0 *OCA* AH0 *OCA* Arel,Arel.,Arel/,Arelz0 *OCA* ,.,/,z0 *OCA* J,J.,J/,Jz0 *OCA* Ba,Ba.,Ba/,Baz0 *OCA* R,R.,R/,Rz0 *OCA* BH0 *OCA* Brel,Brel.,Brel/,Brelz0 *OCA* c0
C1OOS!&c,2KL5 desea calc5lar2, 2 Belocidad2, 2 Aceleraci3n2'0 CAS!
I> c??4 #1!N
INPU#&@Ba.,Ba/,Baz,2Belocidad del sistema de referencia A2'0
INPU#&@J.,J/,Jz,2Belocidad ang5lar del sistema2'0 INPU#&@R.,R/,Rz,2Posici3n relativa2'0 INPU#&@Brel.,Brel/,Brelz,2Belocidad relativa de (2'0 Ba:?Ba.,Ba/,Baz0 J:?J.,J/,Jz0 R:?R.,R/,Rz0 Brel:?Brel.,Brel/,Brelz0
BH:?BaGCROSS&J,R'GBrel0 MS)(O"&2*a velocidad del p5nto ( es:2GBH'0 R!#URN&BH'0 !ND0
I> c??8 #1!N
INPU#&@Aa.,Aa/,Aaz,2Aceleracion del sistema de referencia A2'0 INPU#&@.,/,z,2Aceleracion ang5lar del sistema2'0 INPU#&@J.,J/,Jz,2Belocidad ang5lar del sistema2'0 INPU#&@R.,R/,Rz,2Posici3n relativa2'0 INPU#&@Brel.,Brel/,Brelz,2Belocidad relativa de (2'0 Aa:?Aa.,Aa/,Aaz0 Arel:?Arel.,Arel/,Arelz0
J:?J.,J/,Jz0 R:?R.,R/,Rz0 Brel:?Brel.,Brel/,Brelz0 :?.,/,z0 AH:?AaGCROSS&,R'GCROSS&J,CROSS&J,R''GcFCROSS&J,Brel'GArel0
MS)(O"&2*a aceleraci3n del p5nto ( es:2GAH'0 R!#URN&AH'0 !ND0
!ND0
!ND0
CURSO: DINÁMICA !c5aciones de !5ler
!"POR# Din$mica%!5ler&' (!)IN *OCA* I..,I//,Izz,I./,I.z,I/z0 *OCA* J., J/,Jz0 *OCA* J., J/,Jz0
*OCA* ., /, z0 *OCA* I0 *OCA* J0 *OCA* 0 *OCA* J0 *OCA* M0
INPU#&@I..,I//,Izz ,2Momentos de inercia2'0 INPU#&@I./,I.z,I/z ,2Prod5ctos de inercia2'0 INPU#&@J., J/,Jz ,2Derivadas de las velocidades ang5lares2'0 INPU#&@., /, z ,2Belocidad ang5lar del sistema de referencia2'0 INPU#&@J., J/,Jz ,2Belocidades ang5lares2'0
I:?I..,6I./,6I.z, 6I./,I//,6I/z, 6I.z,6I/z,Izz0 J:? J.,J/,Jz0 :? E,6z, /,z,E,6.,6/,.,E0 J:? J.,J/,Jz0
M:? IF JG FIF J0 R!#URN M0 !ND0