%Se pide realizar un código
en matlab que grafique el tiro parabólico
%que realiza una partícula.
Los datos que se deben ingresan por teclado serán:
%• Velocidad inicial.
%• Angulo
%• Posición inicial en x
%• Posición inicial en y
clc
clear all
h = input('Ingrese la
altura inicial : ');
vo = input('Ingrese la
velocidad inicial en m/s: ');
angulo = input('Ingrese el
angulo : ');
teta = angulo*pi/180;
g = 9.8 ;
syms vy t vy1 y
vy = solve('vy =
(vo*sin(teta))-(g*t)',vy)
tiempo = solve(vy,t)
t = subs(tiempo)
disp(t)
Tiempo = double(t)
TiempoF = 2.*Tiempo;
disp(TiempoF)
TiempoT = [0:0.0001:TiempoF];
Xmax = vo*cos(teta).*TiempoT;
disp(Xmax);
xmax = vo*cos(teta)*TiempoF;
disp(xmax)
ymax = h +
((vo*sin(teta))^2)/(2*g);
disp(ymax);
y = h +
(vo*sin(teta)).*TiempoT-(0.5*g).*(TiempoT.^2);
subplot(2,2,1);
plot(TiempoT,y,'b'),grid on
subplot(2,2,2);
comet(TiempoT,y), title('Grafica Y vs
t'),xlabel('t[segundos]'),ylabel('X[metros]');
y2 = h +
(tan(teta).*Xmax)-(0.5*g/(vo*cos(teta))^2).*(Xmax.^2);
subplot(2,2,3);
plot(Xmax,y2,'g'),grid on
subplot(2,2,4);
comet(Xmax,y2), title('Grafica Y vs
X'),xlabel('X[metros]'),ylabel('Y[metros]');
