Кинематика бойынша өздігінен шешуге арналған есептер

Кинематика бойынша өздігінен шешуге арналған есептер №1

program esep1;

var

 t1, V, t2, t3, s1, s2, a1, s3, a3,V0: real;

begin

  t1 := 20;

  V := 30;

  t2 := 100;

  t3 := 40;

  a1 := V /t1;

  s1 := (a1* sqr(t1))/2;

  s2:=V*t2;

  a3 := V/t3;

  s3:= (V*t3-(( a3* sqr(t3))/2));

  V0:=((s1+s2+s3)/(t1+t2+t3));

  Writeln('a1=', a1);

  Writeln('s1=', s1);

  Writeln('a3=', a3);

  Writeln('s3=', s3);

  Writeln('V0=', V0);

end.

[pic 1]

Matlab

  t1=20;

  V=30;

  t2=100;

  t3=40;

  a1=V/t1

  s1=(a1*(t1*t1))/2

  s2=V*t2

  a3=V/t3

  s3=(V*t3)-(a3*(t3* t3))/2

  V0=((s1+s2+s3)/(t1+t2+t3))

[pic 2][pic 3]

Кинематика бөлімі бойынша эксперименттік есеп

program esep2;

var

 b1,b2,b3,b4,b5,t1,t2,t3,t4,t5 , V1,V2,V3,V4,V5, V01,V02,V03,V04,V05 ,a1,a2,a3,a4,a5, s1,s2,s3,s4,s5: real;

begin

  b1 := 3;

  b2 := 8;

  b3 := 11;

  b4:=15;

  b5 := 15;

  t1 := 1.23;

  t2 := 0.83;

  t3 := 0.5;

  t4 := 0.29;

  t5 := 0.11;

  V1 := 1.43;

  V2 := 1.63;

  V3 := 2.5;

  V4 := 3.88;

  V5 := 9.33;

  V01 := 0.2;

  V02 := 0.8;

  V03 := 1.5;

  V04 := 3;

  V05 := 9;

  a1 := ((V1-V01)/ t1);

  s1:=(((v01*t1)+(a1*t1*t1))/2);