summaryrefslogtreecommitdiff
path: root/964/CH5/EX5.1/5_1.sce
blob: c7f882395b3f94904a3d52ef23ae5321b7dc2e65 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
clc;
clear;
m=68.1;//kg
v=40;//m/s
t=10;//s
g=9.8;//m/s^2
function y=f(c)
    y=g*m*(1-exp(-c*t/m))/c - v;
endfunction
disp("For various values of c and f(c) is found as:")
i=0;
for c=4:4:20
    i=i+1;
    bracket=[c f(c)];
    disp(bracket)
    fc(i)=f(c);
end
c=[4 8 12 16 20]
plot2d(c,fc)
xtitle('f(c) vs c','c','f(c) (m/s)')