#!/usr/bin/perl
#

$debug = 0;

$theta = 4.0*(3.14159/180.0);
$g = 980.0;


while (<STDIN>) {
  $line = " " . $_;
  @words = split(/\s+/, $line);
  $M = $words[1];
  $m = $words[2];
  $a = $words[3];

  if ($debug > 0) {
    printf "  M  %9.2f   m %9.2f   theta %9.2f \n", $M, $m, $theta;
  }

  $top = $m*$g - (  ($m + $M)*$a + $M*$g*sin($theta) );
  $bot = $M*$g*cos($theta);
  $mu = $top / $bot;

  printf " %9.3f %9.3f %9.3f %9.4e \n", $M, $m, $a, $mu;


}


exit 0;