DOCUMENT(); loadMacros( "PG.pl", "PGbasicmacros.pl", "PGauxiliaryFunctions.pl", "PGchoicemacros.pl", "PGanswermacros.pl", "PGgraphmacros.pl", "PG_CAPAmacros.pl" ); TEXT(beginproblem()); ## ****************************************** ## ## That crazy jumping cat ## Part 1 ## By C. Freeman, freeman@NSRL31.NSRL.rochester.edu ## No unauthorized commercial use. ## Imported Files ## ${CAPA_Tools}Problem ##${CAPA_GraphicsDirectory}Gtype16/prob09a.eps ## Values needing defined: ## prob_val (number, e.g. /LET prob_val=1) ## prob_try (number, e.g. /LET prob_try=5) ## ## Last modified 07/21/97 ## by: Patrick D. Freivald, patrick@freivald.org ## ## ************************************** ## $m_cat = random( 3.00 , 5.00 , 0.01 ) ;$m_sled = random( 15.0 , 25.0 , 1.0 ) ; $v_cat = random( 2.00 , 4.50 , 0.01 ) ;$v_s2 = 2.0 * $m_cat *$v_cat / $m_sled ;$v_s1 = 2.0 * $m_cat *$v_cat / ( $m_sled +$m_cat ) ; ## CAPA_import( " ${CAPA_Tools}Problem " ); TEXT(CAPA_EV (<<'END_OF_TEXT')); Two \{ spf($m_sled , "%0.1f" ) \} \{ $kg_u \} ice sleds are placed a short distance apart, one directly behind the other, as shown in the figure. A \{ spf($m_cat , "%0.2f" ) \} \{ $kg_u \} cat, initially standing on sled 1, jumps across to sled 2 and then jumps back to sled 1. Both jumps are made at a horizontal speed of \{ spf($v_cat , "%0.2f" ) \} \{ $mPs_u \} relative to the ice.$BR \{ CAPA_web( '' , '\noindent {\centerline{\epsfxsize = 2.1 in \epsffile{${CAPA_GraphicsDirectory}Gtype16/prob09a.eps}}}' , '' ) \}$BR$BR What is the final speed of sled 2? (Assume the ice is frictionless.) END_OF_TEXT ## TEXT("$BR",ans_rule(30),"$BR"); ANS( CAPA_ans($v_s2 , 'format' => "%0.2e" , 'sig' => '3 plus 13', 'reltol' => 1 , 'wgt' => $prob_val , 'tries' =>$prob_try , 'unit' => 'm/s' ) ); ## ****************************************** ## ## That crazy jumping cat ## Part 2 ## By C. Freeman, freeman@NSRL31.NSRL.rochester.edu ## No unauthorized commercial use. ## Imported Files: ## ${CAPA_Tools}Problem ## Values needing defined: ## prob_val (number, e.g. /LET prob_val=1) ## prob_try (number, e.g. /LET prob_try=5) ## ## Last modified 07/21/97 ## by: Patrick D. Freivald, patrick@freivald.org ## ## ************************************** ## CAPA_import( "${CAPA_Tools}Problem " ); TEXT(CAPA_EV (<<'END_OF_TEXT')); $BR What is the final speed of sled 1? END_OF_TEXT ## TEXT("$BR",ans_rule(30),"$BR"); ANS( CAPA_ans($v_s1 , 'format' => "%0.2e" , 'sig' => '3 plus 13', 'reltol' => 1 , 'wgt' => $prob_val , 'tries' =>$prob_try , 'unit' => 'm/s' ) ); ENDDOCUMENT(); ##################### ###Error: $kg_u not defined in this file ###Error:$kg_u not defined in this file ###Error: $mPs_u not defined in this file ###Error:$prob_val not defined in this file ###Error: $prob_try not defined in this file ###Error:$prob_val not defined in this file ###Error: \$prob_try not defined in this file ##################### ################################################# ## Processing time = 1 secs ( 0.53 usr 0.00 sys = 0.53 cpu) #################################################