File:  [LON-CAPA] / capa / capa51 / GUITools / ideas / of5tool / first.qz
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Sep 28 21:26:14 1999 UTC (25 years, 9 months ago) by albertel
Branches: capa, 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_6_msu, version_2_11_6, version_2_11_5_msu, version_2_11_5, 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, version_0_4, version5-1-2-first_release, start, stable_2002_spring, stable_2002_july, stable_2002_april, stable_2001_fall, release_5-1-3, loncapaMITrelate_1, language_hyphenation_merge, language_hyphenation, conference_2003, bz6209-base, bz6209, STABLE, HEAD, GCI_3, GCI_2, GCI_1, CAPA_5-1-6, CAPA_5-1-5, CAPA_5-1-4_RC1, BZ4492-merge, BZ4492-feature_horizontal_radioresponse, BZ4492-feature_Support_horizontal_radioresponse, BZ4492-Support_horizontal_radioresponse
Created directory structure

    1: //****************************
    2: /LET prob_val=1
    3: //HIN No hint unless this line is uncommented and modified
    4: //EXP No explanation unless this line is uncommented and modified
    5: /IMP "../Tools/Problem#"
    6: A mass M = 0.16 /DIS(kg_u) is on a smooth horizontal surface (negligiable friction). It is attached to a spring with spring constant k = 15.3 /DIS(NPm_u). The mass is displaced from its equilibrium position (x=0) by a distance of 0.14 m (x= + 0.14 m) and then released from rest. (Give all of the correct answers, i.e., A or BC or ABC. . .)
    7: //----------------------------
    8: /LET s1a="The motion of M is simple harmonic motion."
    9: /LET mix1=random(1,1,1)
   10: /LET a1a=1
   11: //
   12: /LET s2a="The amplitude varies with time."
   13: /LET s2b="The amplitude doesn't vary with time."
   14: /LET mix2=random(1,2,1)
   15: /LET a2a=2
   16: /LET a2b=1
   17: //
   18: /LET s3a="The frequency of oscillation is independant of k."
   19: /LET s3b="The period of oscillation is independant of k."
   20: /LET s3c="The frequency of oscillation depends on k."
   21: /LET mix3=random(1,3,1)
   22: /LET a3a=2
   23: /LET a3b=2
   24: /LET a3c=1
   25: //
   26: //Nof5aux follows
   27: /LET s1=choose(mix1,s1a)
   28: /LET a1=choose(mix1,a1a)
   29: /LET s2=choose(mix2,s2a,s2b)
   30: /LET a2=choose(mix2,a2a,a2b)
   31: /LET s3=choose(mix3,s3a,s3b,s3c)
   32: /LET a3=choose(mix3,a3a,a3b,a3c)
   33: /LET seed=random(1,300,1)
   34: /MAP(seed;M1,M2,M3;s1,s2,s3)
   35: /LET it=tex("\item[] ","")
   36: /DIS(tex("\begin{choicelist}",""))
   37: /DIS(it) A) /DIS (M1)
   38: /DIS(it) B) /DIS (M2)
   39: /DIS(it) C) /DIS (M3)
   40: /DIS(tex("\end{choicelist}",""))
   41: /MAP(seed;b1,b2,b3;a1,a2,a3)
   42: /LET NM1=b1*(b1==1)+1
   43: /LET NM2=b2*(b2==1)+1
   44: /LET NM3=b3*(b3==1)+1
   45: /LET lett1=choose(NM1,"","A")
   46: /LET lett2=choose(NM2,"","B")
   47: /LET lett3=choose(NM3,"","C")
   48: /LET Nof5right=lett1+lett2+lett3
   49: //**************************
   50: /DIS(stdline)
   51: /ANS(Nof5right,wgt=prob_val,str=mc)
   52: //**************************

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