clc
clear
disp("Kaliyah Johnson")

x = 0;
y = 0;

while y < 9.8
    x = x + 0.1;
    y = 10*(1-exp(-x/4));
end

xmax = x

x = 0:0.1:xmax;
y = 10*(1-exp(-x/4));

plot(x,y)
xlabel('Time (seconds)')
ylabel('Force (newtons)')
title('Force vs Time by kaliyah johnson')