clear all close all clc %program(1) to calculate drag force on cycle and make plots of that. %inputs %Area m^2 a=.5 %density kg/m^3 rho=1.2 %velocity m/sec (for different velocities) v=1:40; %Drag coefficient c_d=.5 drag_force=.5*a*v.^2*rho*c_d; plot(v,drag_force,\'color\',\'r\') xlabel(\'v(m/sec)\') ylabel(\'Drag Force(N)\')…

% variables theta_1=linspace(0,90,2) theta_2=linspace(0,90,2) l_1=1 l_2=.5 ct=1 for i=1:length(theta_1) Theta_1=theta_1(i) for j=1:length(theta_2) Theta_2=theta_2(j) x_0=0 y_0=0 x_1=l_1*cosd(Theta_1) y_1=l_1*sind(Theta_1) x_2=x_1+l_2*cosd(Theta_2) y_2=y_1+l_2*sind(Theta_2) %plot plot([x_0 x_1],[y_0 y_1],[x_1 x_2],[y_1…

% variables theta_1=linspace(0,90,2) theta_2=linspace(0,90,2) l_1=1 l_2=.5 ct=1 for i=1:length(theta_1) Theta_1=theta_1(i) for j=1:length(theta_2) Theta_2=theta_2(j) x_0=0 y_0=0 x_1=l_1*cosd(Theta_1) y_1=l_1*sind(Theta_1) x_2=x_1+l_2*cosd(Theta_2) y_2=y_1+l_2*sind(Theta_2) %plot plot([x_0 x_1],[y_0 y_1],[x_1 x_2],[y_1…

% command for row vector a=[2 8 7 9 4] %command for column vector a=[1;3;5;8]