Skip to content

Commit a35c37e

Browse files
drdrew42drdrew42
authored
Merge pull request openwebwork#1159 from brittnilorton/master
Update Videos in Problems
2 parents c68d967 + 6128965 commit a35c37e

16 files changed

+90
-93
lines changed

‎Contrib/CCCS/AlgebraicLiteracy/IA_8.4/OpenStax_IA_8.4_165.pg‎

Lines changed: 11 additions & 13 deletions
Original file line numberDiff line numberDiff line change
@@ -1,12 +1,10 @@
11
#Add or Subtract Radicals
22
# ENDDESCRIPTION
3-
## DBsubject()
4-
## DBchapter()
5-
## DBsection()
3+
## DBsubject(Algebra)
4+
## DBchapter(Properties of exponents, rational exponents and radicals)
5+
## Date(6/2019)
66
## Institution(Red Rocks Community College)
77
## Author(Martha Stevens)
8-
## Date(6/2019)
9-
## KEYWORDS()
108

119

1210
DOCUMENT();
@@ -27,23 +25,23 @@ TEXT(beginproblem());
2725
Context("Numeric");
2826

2927
#Part A
30-
$a = list_random(2, 3, 5, 7);
31-
$b = non_zero_random(-10, 10);
28+
$a = list_random(2, 3, 5, 7, 10);
29+
do{$b = non_zero_random(-10, 10);
3230
$c = non_zero_random(-10, 10);
33-
$d = Compute("$b+$c");
31+
$d = Compute("$b+$c");}until($d !=0);
3432

3533
#Part B
3634
$n = random(3, 6);
3735
$b2 = non_zero_random(-10, 10);
3836
do{
3937
$c2 = non_zero_random(-10, 10);
40-
}until($c2 != -$b2);
41-
42-
$d2 = Compute("$c2 + $b2");
38+
$d2 = Compute("$c2 + $b2");}until($d2 !=0);
4339

4440
Context("LimitedRadical");
4541

46-
$ans1 = Formula("$d*sqrt($a)");
42+
if($d ==1){$ans1 = Formula("sqrt($a)");}
43+
elsif($d ==-1){$ans1 = Formula("-sqrt($a)");}
44+
else{$ans1 = Formula("$d*sqrt($a)");}
4745
$ans2 = Formula("$d2*root($n,x)");
4846

4947
##########################################
@@ -56,7 +54,7 @@ BEGIN_PGML
5654
Simplify each radical.
5755

5856

59-
(a) [`` [$b]\sqrt{[$a]} + [$c]\sqrt{[$a]} = ``] [_____________]{$ans1->cmp(mathQuillOpts => "rootsAreExponents: false")}
57+
(a) [`` [$b]\sqrt{[$a]} + [$c]\sqrt{[$a]} = ``] [_____________]{$ans1}
6058

6159
(b) [`` [$b2]\sqrt[[$n]]{x} + [$c2]\sqrt[[$n]]{x} = ``] [_____________]{$ans2->cmp(mathQuillOpts => "rootsAreExponents: false")}
6260

‎Contrib/CCCS/CollegeAlgebra/3.2/RRCC_CCCS_Openstax_AlgTrig_AT-1-001-AS_3_2_43.pg‎

Lines changed: 15 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -59,6 +59,13 @@ $piecewise =
5959
Row(["\(\displaystyle f(x) = \Bigg\{ \; \)",ans_rule(1).$BR.$BR.ans_rule(1),'\(\displaystyle for \)'.$BR.$BR.'\(\displaystyle for \)',ans_rule(1).$BR.$BR.ans_rule(1), '\( < x < \)'.$BR.$BR. '\( < x < \)', ans_rule(1).$BR.$BR.ans_rule(1)],separation=>1).
6060
EndTable();
6161

62+
$video = MODES(
63+
HTML=>
64+
'<iframe width="420" height="315" src="https://www.youtube.com/embed/AQaKh_1poBI?si=434GxpZTrlifghlN"frameborder="0" allowfullscreen></iframe>',
65+
TeX =>
66+
"An embedded YouTube video."
67+
);
68+
6269
BEGIN_TEXT
6370
$BCENTER
6471
\{ image(insertGraph($graph),tex_size => 400, width=>400, height=>400) \}
@@ -72,8 +79,16 @@ END_TEXT
7279

7380
BEGIN_PGML
7481
[$piecewise]*
82+
83+
[$video]*
84+
7585
END_PGML
86+
BEGIN_TEXT
87+
$BR
7688

89+
If the video does not work, \{ htmlLink ("https://www.youtube.com/watch?v=AQaKh_1poBI", "click here to watch on YouTube.", "TARGET='_blank'")\}
90+
$BR
91+
END_TEXT
7792
$slope1 = ($y2- $y1)/($x2 - $x1);
7893
$slope2 = ($y3- $y2)/($x3 - $x2);
7994
$ans1 = FEQ( EV2(" $slope1*(x - $x1) + $y1 ") );

‎Contrib/CCCS/CollegeAlgebra/3.2/RRCC_CCCS_Openstax_AlgTrig_AT-1-001-AS_3_2_45.pg‎

Lines changed: 13 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -55,6 +55,13 @@ Context()->noreduce("(-x)-y");
5555

5656
$fun = PiecewiseFunction("$c*x-$d if x < -$b else sqrt(x) if x > $a")->reduce;
5757

58+
$video = MODES(
59+
HTML=>
60+
'<iframe width="420" height="315" src="https://www.youtube.com/embed/B1jfpiI-QQ8?si=y-N2Bm3EMsjziFU0"frameborder="0" allowfullscreen></iframe>',
61+
TeX =>
62+
"An embedded YouTube video."
63+
);
64+
5865
##############################################
5966
# Main text
6067

@@ -68,10 +75,15 @@ Graph the piecewise function to find its domain and range.
6875

6976
Range: [_________________]{$range} [@ AnswerFormatHelp("intervals") @]*
7077

71-
78+
[$video]*
7279

7380
END_PGML
81+
BEGIN_TEXT
82+
$BR
7483

84+
If the video does not work, \{ htmlLink ("https://www.youtube.com/watch?v=B1jfpiI-QQ8", "click here to watch on YouTube.", "TARGET='_blank'")\}
85+
$BR
86+
END_TEXT
7587
#Context()->normalStrings;
7688

7789

‎Contrib/CCCS/CollegeAlgebra/6.1/CCD_CCCS_Openstax_AlgTrig_AT-1-001-AS_6_1_39.pg‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -36,7 +36,7 @@ TEXT(beginproblem());
3636
# Setup
3737
$a=random(1000,5000);
3838
$b=non_zero_random(-1,1,.01);
39-
39+
$b = Round($b, 3);
4040
Context("Numeric");
4141

4242
if ($b>0)

‎Contrib/CCCS/CollegeAlgebra/6.1/CCD_CCCS_Openstax_AlgTrig_AT-1-001-AS_6_1_9.pg‎

Lines changed: 1 addition & 14 deletions
Original file line numberDiff line numberDiff line change
@@ -61,12 +61,6 @@ $ans1=Compute($a-$b);
6161

6262
$ans2=Compute($f2-$f1);
6363

64-
$video = MODES(
65-
HTML=>
66-
'<iframe width="420" height="315" src="//www.youtube.com/embed/KCDtss0pT_c"frameborder="0" allowfullscreen></iframe>',
67-
TeX =>
68-
"An embedded YouTube video."
69-
);
7064

7165
###########################
7266
# Main text
@@ -92,16 +86,9 @@ For each year [`t`], the number of trees in Forest A is represented by the funct
9286
5. After 30 years, by how many trees will the larger forest exceed the smaller forest? Round to two decimal places.
9387
[_________________]{$ans2}
9488

95-
[$video]*
96-
END_PGML
97-
9889

99-
BEGIN_TEXT
100-
$BR
90+
END_PGML
10191

102-
If the video does not work, \{ htmlLink ("https://www.youtube.com/watch?v=KCDtss0pT_c", "click here to watch on YouTube.", "TARGET='_blank'")\}
103-
$BR
104-
END_TEXT
10592

10693
############################
10794
# Solution

‎Contrib/CCCS/CollegeAlgebra/6.6/RRCC_CCCS_Openstax_AlgTrig_AT-1-001-AS_6_6_12.pg‎

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -40,7 +40,7 @@ $ans=List(" 1/$c*ln($b/$a) ");
4040

4141
$video = MODES(
4242
HTML=>
43-
'<iframe width="560" height="315" src="https://www.youtube.com/embed/XBpg0PN6ZG4" frameborder="0" allow="accelerometer; autoplay; encrypted-media; gyroscope; picture-in-picture" allowfullscreen></iframe>',
43+
'<iframe width="560" height="315" src="https://www.youtube.com/embed/Y7r0cl6X6mU?si=PUdq8Bsp0vuPC5bk" frameborder="0" allow="accelerometer; autoplay; encrypted-media; gyroscope; picture-in-picture" allowfullscreen></iframe>',
4444
TeX =>
4545
"An embedded YouTube video."
4646
);
@@ -62,7 +62,7 @@ END_PGML
6262
BEGIN_TEXT
6363
$BR
6464

65-
If the video does not work, \{ htmlLink ("https://youtu.be/XBpg0PN6ZG4", "click here to watch on YouTube.", "TARGET='_blank'")\}
65+
If the video does not work, \{ htmlLink ("https://www.youtube.com/watch?v=Y7r0cl6X6mU", "click here to watch on YouTube.", "TARGET='_blank'")\}
6666
$BR
6767
END_TEXT
6868

‎Contrib/CCCS/CollegeAlgebra/7.6/CCD_CCCS_Openstax_IntAlg_IA-2017-000-LC_7_6_347.pg‎

Lines changed: 2 additions & 20 deletions
Original file line numberDiff line numberDiff line change
@@ -70,12 +70,6 @@ else {
7070
}
7171

7272

73-
$video = MODES(
74-
HTML=>
75-
'<iframe width="420" height="315" src="//www.youtube.com/embed/2RnS3fSHVV8"frameborder="0" allowfullscreen></iframe>',
76-
TeX =>
77-
"An embedded YouTube video."
78-
);
7973

8074
###########################
8175
# Main text
@@ -89,15 +83,10 @@ Solve the rational inequality. Enter the answer in interval notation.
8983

9084
[_______________________________]{$x1} [@ AnswerFormatHelp("intervals") @]*
9185

92-
[$video]*
86+
9387
END_PGML
9488

9589

96-
BEGIN_TEXT
97-
$BR
98-
If the video does not work, \{ htmlLink ("https://www.youtube.com/watch?v=2RnS3fSHVV8", "click here to watch on YouTube.", "TARGET='_blank'")\}
99-
$BR
100-
END_TEXT
10190

10291
}
10392
else
@@ -109,16 +98,9 @@ Solve the rational inequality. Enter the answer in interval notation.
10998

11099
[_______________]{$x1} [@ AnswerFormatHelp("intervals") @]*
111100

112-
[$video]*
113-
END_PGML
114101

102+
END_PGML
115103

116-
BEGIN_TEXT
117-
$BR
118-
119-
If the video does not work, \{ htmlLink ("https://www.youtube.com/watch?v=2RnS3fSHVV8", "click here to watch on YouTube.", "TARGET='_blank'")\}
120-
$BR
121-
END_TEXT
122104

123105
}
124106

‎Contrib/CCCS/CollegeAlgebra/Circles/CCD_CCCS_Circles_6.pg‎

Lines changed: 14 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -51,7 +51,12 @@ $radius = sqrt($radicand);
5151
Context("LimitedPoint");
5252
$center=Point("( ($a/2),($b/2) )");
5353

54-
54+
$video = MODES(
55+
HTML=>
56+
'<iframe width="420" height="315" src="https://www.youtube.com/embed/KA4nOBywEpI?si=jeAOTxg7Rg3AHI3o" frameborder="0" allowfullscreen></iframe>',
57+
TeX =>
58+
"An embedded YouTube video."
59+
);
5560

5661

5762
###########################
@@ -66,10 +71,16 @@ Radius:[_______________]{$radius}[@ AnswerFormatHelp("numbers") @]*
6671

6772
Center:[_______________]{$center}[@ AnswerFormatHelp("points") @]*
6873

69-
74+
[$video]*
7075
END_PGML
7176

72-
77+
78+
BEGIN_TEXT
79+
$BR
80+
81+
If the video does not work, \{ htmlLink ("https://www.youtube.com/watch?v=KA4nOBywEpI", "click here to watch on YouTube.", "TARGET='_blank'")\}
82+
$BR
83+
END_TEXT
7384

7485
############################
7586
#Answers

‎Contrib/CCCS/CollegeAlgebra/Circles/RRCC_CCCS_Circles_1.pg‎

Lines changed: 1 addition & 12 deletions
Original file line numberDiff line numberDiff line change
@@ -46,12 +46,6 @@ $f = Formula("(x-$h)^2+(y-$k)^2")->reduce;
4646
Context("LimitedPoint");
4747
$cen = Point("($h,$k)");
4848

49-
$video = MODES(
50-
HTML=>
51-
'<iframe width="420" height="315" src="//www.youtube.com/embed/k5Z3qb052Ek" frameborder="0" allowfullscreen></iframe>',
52-
TeX =>
53-
"An embedded YouTube video."
54-
);
5549

5650

5751
###########################
@@ -66,15 +60,10 @@ Find the center and radius of the following circle. Enter the center as an order
6660
+ radius: [___]{$r} [@ AnswerFormatHelp("numbers") @]*
6761

6862

69-
[$video]*
63+
7064
END_PGML
7165

72-
BEGIN_TEXT
73-
$BR
7466

75-
If the video does not work, \{ htmlLink ("https://www.youtube.com/watch?v=k5Z3qb052Ek", "click here to watch on YouTube.", "TARGET='_blank'")\}
76-
$BR
77-
END_TEXT
7867

7968

8069
############################

‎Contrib/CCCS/CollegeAlgebra/Circles/RRCC_CCCS_Circles_5.pg‎

Lines changed: 14 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -51,7 +51,13 @@ $ans1=Formula("(x-$h)^2+(y-$k)^2")->reduce;
5151
$ans2=Formula("$r2");
5252

5353

54-
54+
$video = MODES(
55+
HTML=>
56+
'<iframe width="420" height="315" src="//www.youtube.com/embed/k5Z3qb052Ek" frameborder="0" allowfullscreen></iframe>',
57+
TeX =>
58+
"An embedded YouTube video."
59+
);
60+
5561

5662
###########################
5763
# Main text
@@ -64,10 +70,15 @@ Find the equation for the circle with center [` ([$h],[$k]) `] and passes throug
6470
[_______________] [`=`] [_____________][@ AnswerFormatHelp("numbers") @]*
6571

6672

67-
73+
[$video]*
6874
END_PGML
6975

70-
76+
BEGIN_TEXT
77+
$BR
78+
79+
If the video does not work, \{ htmlLink ("https://www.youtube.com/watch?v=k5Z3qb052Ek", "click here to watch on YouTube.", "TARGET='_blank'")\}
80+
$BR
81+
END_TEXT
7182

7283
############################
7384
#Answers

0 commit comments

Comments
 (0)