program y926 implicit none real::A,B,C read(5,*)A,B,C print'(f0.10)',(A/B)*C end program y926