#!/usr/bin/perl
#
#

$dt = 0.01;

for ($t = 0; $t < 10; $t += $dt) {

  $x = 0 + 0.3*($t*$t);
  $v = 0.6*$t - 0.6;
  $a = 0.6;

  printf " %7.2f %7.2f %7.2f %7.2f  \n",
        $t, $x, $v, $a;


}

exit 0;
