File:  [LON-CAPA] / loncom / homework / CAPA-converter / conversion_wrapper / serprob.problem
Revision 1.1: download - view: text, annotated - select for diffs
Wed Mar 20 18:15:00 2002 UTC (22 years, 2 months ago) by albertel
Branches: MAIN
CVS tags: version_2_9_X, version_2_9_99_0, version_2_9_1, version_2_9_0, version_2_8_X, version_2_8_99_1, version_2_8_99_0, version_2_8_2, version_2_8_1, version_2_8_0, version_2_7_X, version_2_7_99_1, version_2_7_99_0, version_2_7_1, version_2_7_0, version_2_6_X, version_2_6_99_1, version_2_6_99_0, version_2_6_3, version_2_6_2, version_2_6_1, version_2_6_0, version_2_5_X, version_2_5_99_1, version_2_5_99_0, version_2_5_2, version_2_5_1, version_2_5_0, version_2_4_X, version_2_4_99_0, version_2_4_2, version_2_4_1, version_2_4_0, version_2_3_X, version_2_3_99_0, version_2_3_2, version_2_3_1, version_2_3_0, version_2_2_X, version_2_2_99_1, version_2_2_99_0, version_2_2_2, version_2_2_1, version_2_2_0, version_2_1_X, version_2_1_99_3, version_2_1_99_2, version_2_1_99_1, version_2_1_99_0, version_2_1_3, version_2_1_2, version_2_1_1, version_2_1_0, version_2_12_X, version_2_11_X, version_2_11_4_uiuc, version_2_11_4_msu, version_2_11_4, version_2_11_3_uiuc, version_2_11_3_msu, version_2_11_3, version_2_11_2_uiuc, version_2_11_2_msu, version_2_11_2_educog, version_2_11_2, version_2_11_1, version_2_11_0_RC3, version_2_11_0_RC2, version_2_11_0_RC1, version_2_11_0, version_2_10_X, version_2_10_1, version_2_10_0_RC2, version_2_10_0_RC1, version_2_10_0, version_2_0_X, version_2_0_99_1, version_2_0_2, version_2_0_1, version_2_0_0, version_1_99_3, version_1_99_2, version_1_99_1_tmcc, version_1_99_1, version_1_99_0_tmcc, version_1_99_0, version_1_3_X, version_1_3_3, version_1_3_2, version_1_3_1, version_1_3_0, version_1_2_X, version_1_2_99_1, version_1_2_99_0, version_1_2_1, version_1_2_0, version_1_1_X, version_1_1_99_5, version_1_1_99_4, version_1_1_99_3, version_1_1_99_2, version_1_1_99_1, version_1_1_99_0, version_1_1_3, version_1_1_2, version_1_1_1, version_1_1_0, version_1_0_99_3, version_1_0_99_2, version_1_0_99_1, version_1_0_99, version_1_0_3, version_1_0_2, version_1_0_1, version_1_0_0, version_0_99_5, version_0_99_4, version_0_99_3, version_0_99_2, version_0_99_1, version_0_99_0, version_0_6_2, version_0_6, version_0_5_1, version_0_5, loncapaMITrelate_1, language_hyphenation_merge, language_hyphenation, conference_2003, bz6209-base, bz6209, bz5969, bz2851, PRINT_INCOMPLETE_base, PRINT_INCOMPLETE, HEAD, GCI_3, GCI_2, GCI_1, BZ5971-printing-apage, BZ5434-fox, BZ4492-merge, BZ4492-feature_horizontal_radioresponse, BZ4492-feature_Support_horizontal_radioresponse, BZ4492-Support_horizontal_radioresponse
- adding Ohio Universities CAPA -> LON-CAPA cleanup scripts

    1: <problem>
    2: 
    3: <import>/res/ohiou/capa/Tools/StdUnits.library</import>
    4: <import>/res/ohiou/capa/Tools/StdConst.library</import>
    5: <import>/res/ohiou/capa/Tools/StdMacros.library</import>
    6:  
    7: <hr />
    8: <displayduedate />
    9: <displaytitle />
   10: 
   11: 
   12: 
   13: <script type="loncapa/perl">
   14: # ****************************************************** 
   15: # /  Serway & Faughn chapter 5 problem 68 difficulty 3
   16: # /  written at MSU July 1998   T&T
   17: # /****************************************************** 
   18: # /BEG prob_val=1
   19: # /LET try_val=99
   20: # /HIN space for hints
   21: </script>
   22: 
   23: <script type="loncapa/perl">
   24: $m=&random(2.20,2.505,0.01);
   25: $k=&random(100.0,120.5,1.0);
   26: $d=&random(15.0,20.05,0.1);
   27: $angle=&random(34.0,40.05,0.1);
   28: $alpha=&web('alpha','$\alpha$','<i>alpha</i>');
   29: $picture=&web('','\centerline{\epsfxsize="2.2in" \epsffile{/res/ohiou/serwaylib/Graphics/Graph05/serw0568.eps}}','<IMG SRC="/res/ohiou/serwaylib/Graphics/Graph05/serw0568.gif">');
   30: </script>
   31: 
   32: <startouttext /><hr />
   33: A <display>&format(${m},'2f')</display><display>${kg_u}</display> bloke situated on a rough incline (assume an angle of <display>${alpha}</display> = <display>&format(${angle},'1f')</display><display>${deg_u}</display>) is connected to a spring of negligible mass having a spring constant k = of <display>&format(${k},'0f')</display><display>${NPm_u}</display> (see the figure below).<display>${newline}</display>
   34: <display>${newline}</display><display>${picture}</display>
   35: The bloke is released from rest when the spring is unstretched, and the pulley is frictionless. The bloke moves <display>&format(${d},'1f')</display><display>${cm_u}</display> down the incline before coming to rest. Find the coefficient of kinetic friction between bloke and incline.
   36: <br />
   37: <endouttext />
   38: 
   39: <script type="loncapa/perl">
   40: $mu=-($k*$d/100./2.-$m*9.8*&sin($angle*$pi_c/180.))/$m/9.8/&cos($angle*$pi_c/180.);
   41: </script>
   42: 
   43: <numericalresponse answer="$mu" format="2E">
   44: 	<responseparam name="tol" type="tolerance" description="Numerical Tolerance" default="2%" />
   45: 	<responseparam name="sig" type="int,range,0-12" description="Significant Figures" default="3,5" />
   46: 	<textline />
   47: </numericalresponse>
   48: 
   49: 
   50: <script type="loncapa/perl">
   51: # ******************************************************
   52: </script>
   53: 
   54: <hr />
   55: more stuff at the foot.
   56: 
   57: </problem>

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>