code for diagrams

> xoft:= t->50+5*t+t^2:
plot(xoft(t),t=0..5, xtickmarks=[0,1,2,3,4,5], ytickmarks= [0,20,40,60, 80], axesfont=[TIMES,BOLD,12], titlefont=[TIMES,BOLD,16],title=`s(t)`, view=[0..5,0..80],thickness=3,labels=[`time`, `meters` ],labelfont=[TIMES,BOLD,12]);
plot(diff(xoft(t),t),t=0..5, xtickmarks=[0,1,2,3,4,5], ytickmarks= [0,2 ,4 ,6 , 8, 10 ], axesfont=[TIMES,BOLD,12], titlefont=[TIMES,BOLD,16],title=`v(t)= s'(t)`, view=[0..5,0..10],thickness=3,labels=[`time`, `m/sec`],labelfont=[TIMES,BOLD,12]);
plot(diff(diff(xoft(t),t),t),t=0..5, xtickmarks=[0,1,2,3,4,5], ytickmarks= [0,1,2,3,4,5] , axesfont=[TIMES,BOLD,12], titlefont=[TIMES,BOLD,16],title=`a(t)= s''(t)`, view=[0..5,0..5],thickness=3,labels=[`time`, `m/sec^2`],labelfont=[TIMES,BOLD,12]);