HP28S Calculus Solution Manual
HP28S Calculus Solution Manual
HP28S Calculus Solution Manual
Step-by-Step Solutions
for Your HP-28S or HP-28C Calculator
rl,nt
HEWLETT
a,:/.!jI PACKARD
Edition 2 June 1988
Reorder Number 00028-90102
Notice
This book and any keystroke programs contained herein are provided "as
is" and are subject to change without notice. Hewlett-Packard Company
makes no warranty of any kind with regard to this book or the keystroke
programs contained herein, including, but not limited to, the implied
warranties of merchantability and fitness for a particular purpose.
Hewlett-Packard Company shall not be liable for any errors or for
incidental or consequential damages in connection with the furnishing,
performance, or use of this book or the keystroke programs contained
herein.
Hewlett-Packard Company 1987. All rights reserved. Reproduction,
adaptation, or translation of this book, including any programs, is prohibited without prior written permission of Hewlett-Packard Company;
except as allowed under the copyright laws. Hewlett-Packard Company
grants you the right to use any program contained in this book in a
Hewlett -Packard calculator.
The programs that control your calculator are copyrighted and all rights
are reserved. Reproduction, adaptation, or translation of those programs
without prior written permission of Hewlett-Packard Company is also
prohibited.
Corvallis Division
1000 N.E. Circle Blvd.
Corvallis, OR 97330, U.S.A.
Printing History
Edition 1
Edition 2
November 1987
June 1988
Welcome...
... to the HP-28S and HP-28C Step-by-Step Books. These books are
designed to help you get the most from your HP-28S or HP-28C calculator.
This book, Calculus, provides examples and techniques for solving problems on your HP-28S or HP-28C. A variety of function operations and
differential and integral calculus problems are designed to familiarize you
with the many functions built into your calculator.
Before you try the examples in this book, you should be familiar with certain concepts from the owner's documentation:
The basics of your calculator: how to move from menu to menu, how
to exit graphics and edit modes, and how to use the menu to assign
values to, and solve for, user variables .
Entering numbers, programs, and algebraic expressions into the calculator.
Please review the section "How To Use This Book." It contains important
information on the examples in this book.
For more information about the topics in the Calculus book, refer to a
basic textbook on the subject. Many references are available in university
libraries and in technical and college bookstores. The examples in the
book demonstrate approaches to solving certain problems, but they do not
cover the many ways to approach solutions to mathematical problems.
Our thanks to Ross Greenley of Oregon State University for developing the
problems in this book.
Welcome...
Contents
7
11
12
14
16
22
23
27
28
51
54
57
Differential Calculus
Minimize Perimeter
Mimimize Surface Area
Lines Tangent to a Circle
Implicit Differentiation With User-Defined Derivative
Taylor Series Error Term
Tangent Lines and Taylor Series
Normal Line
Implicit Functions
61
62
69
72
76
80
82
84
86
89
Integral Calculus
Integration and Free Falling Body
Double Integration
Area Between Two Curves
Arc Length
Surface Area
Arc Length of Parametric Equations
Surface Area of Parametric Equations
Volume of Solid of Revolution: Method of Shells
Volume of Solids of Revolution: Method of Disks.
31
35
43
45
Contents
Keys and Menu Selection: A box represents a key on the calculator keyboard.
W'!TER]
[lli]
ISTOI
LARRAYI
[fbQ!]
IALGEBRA I
Key:
Description:
~DRAW~
= ISOL=
~ABCD ~
Menus typically include more menu labels than can be displayed above the
six redefinable menu keys. Press INEXT 1and IPREV I to roll through the
menu options. For simplicity, [lJEXT I and [PREV I are NOT shown in the
examples.
To solve for a user variable within [:~6LVR ~, press the shift key, followed
by the appropriate user-defined menu key:
D ~ ABCb ~.
The keys above indicate the shift key, followed by the user-defined key
labeled "ABCD". Pressing these keys initiates the Solver function to seek a
solution for "ABCD" in a specified equation.
The symbol G2J indicates the cursor-menu key.
Interactive Plots and the Graphics Cursor: Coordinate values
you obtain from plots using the [INS Iand [QJ digitizing keys may differ
from those shown, due to small differences in the positions of the graphics
cursor. The values you obtain should be satisfactory for the Solver rootfinding that follows.
Display Formats and Numeric Input: Negative numbers,
displayed as
-5
-12345.678
[[-1,-2,-3 [ -4,-5,-6 [
are created using the [CHS I key.
5 [Q{~J
12345.678 [QjSJ
[ [1 [Qjj , 2 [9H~,
The examples in this book typically specify a display format for the
number of decimal places. If your display is set such that numeric displays
do not match exactly, you can modify your display format with the [MODE I
menu and the ~FIX ~ key within that menu. For example, to set the calculator to display two decimal places, set it to FIX2 mode by pressing l_MOD[J
2 ~ FIX-~.
- -~1
11:
'
l0_~ ]fi!!IIE!1!I3D[DEG}.itJ~
~2:
---l
I
1:
1~~~I3D_~itJ~
Notice that the HP-28C highlights the entire active menu item, while the
HP-28S display includes a small box in the active menu item.
The screens shown below illustrate the HP-28C and HP-28S versions of
the~~menu.
3:
2:
1"
. . . . . .IIDIIm!1_
L~--:d
3:
2:
t:oo:::JCDOOEITffilCJ
10
Function Operations
The primary goals of this chapter are to write user-defined functions and
introduce the root finding, plotting, and calculus capabilities of the
HP-28S and HP-28C. Problems include definition and assignment of the
trigonometric co-functions in the USER menu, analysis of a cubic equation, and both specific and general cases of computation of the angle
between two intersecting lines.
Function Operations
11
Function Definition
This section demonstrates creation of simple user-defined functions. The
use of functions of this type is basic to efficient use of the HP-28S.
Example: The HP-28S and HP-28C have three basic trigonometric
functions built in - sine, cosine, and tangent. It is simple to add the remaining co-functions to the USER menu. Built-in functions of the calculator
can be easily combined to create new functions. The use of programs and
local variables permits the newly defined functions to be used in the same
manner as the built-in functions.
ICLEAR I B
-+ X
'l+SIN (x
IENTER I
'CSC
4
3
ISTOI
x 'l/SIN( x )'
It
- ---
'l+COS (x
3
2
I ENTER I
x 'l/COS(x)'
'SEC
ISTOI
2
1
'l+TAN (x
IENTER !
12
Function Definition
~- --
- -.
I~:
~ ~
-I
I
'UTAN (x) , ~
'COT
! STO!
4
3
2
First, store the value of X and select radians and standard display modes .
2 !ENTER !
3:
'X ! STO!
1:
IiiDllillllmJll3:DIDDmD
~ ~ RAD ~ ~ STD ~
2:
'COT (X
!ENTER !
!EVAL!
3:
r~
4.93315487558
IiiDllillllmJll3:DIDDmD
'SQ(CSC(X-SQ(COT(X
3:
! ENTER ! ! EVAL !
1:
2:
4.93315487558
IiiDllillllmJll3:DIDDmD
'X' [PURGE !
Function Definition
13
Function Composition
This section demonstrates additional utility of user-defined functions.
Arguments of the functions may be both numeric and symbolic.
[;2J
'
x A 2+ 1 I ENTER I
ISTO I
14
x x'2+ I'
- _ --1
Now create G.
---. X
4
3
2
x '5*x+2'
'G
ISTO I
4
3
2
1
l ' G ( F (X
I ENTER I
1',Ir ~Ec6'1
6t.J l"'fTi16~':'1oN
4
3
2
1
L - -_ _ __
'G(F(X J
_ __
4
3
2
14
'5*(X"2+1)+2'
n( TOl e, ',is
1'ilCl\)h':le<6<:iS.
'-
6)lC""~
EXPAN ~
'3 :
2"
- _o_oJ
1:
'5*X A2+5*1+2'
3:
2:
1:
'?+5*X A2'
HmJlBilmlimllmmm:li!.l)[D!I)
~ COLCT ~
HmJlBilmlimllmmm:li!.l)[D!I)
"
. ; ,"
"
'. \
, F ( G (X I ENTER I
, , .'
, ,,
'?+5*X A2'
'F(G(X'
HmJlBilmlimllmmm:li!.l)[D!I)
"
3:
2:
1:
IEVALI
2:
1:
q,
'?+5*X A2'
'(5*X+2)A2+1'
HmJlBilmlimllmmm:li!.l)[D!I)
I,
I I.
' I ,
2:
'?+5*X A2'
1: '(5*X)A2+2*<5*X)*2+2
A2+1'
= EXPAN =
HmJlBilmlimllmmm:li!.l)[D!I)
' I.
2:
'?+5*X A2'
1: '5*X*(5*X)+2*(5*X)*2
+2*2+1'
= EXPAN =
"
'\
"
'I,
HmJlBilmlimllmmm:li!.l)[D!I)
3:
= COLCT =
2:
1:
'?+5*X A2'
' 5+25*X A2+20*X '
HmJlBilmlimllmmm:li!.l)[D!I)
"
'I
'I
II
{ 'F' 'G'
I PURGE I
~N
c 'fj (:li':
t } fQ ;-rI'ot
fe r
pl..-Iy~e
Function Composition
"
15
Function Analysis
The ability to locate extreme values and other key features of functions is
critical to the solution of many problems in science and engineering. This
section demonstrates the use of calculus to locate such features.
[gLEAR] G:?]
'X A 3+6 x XA 2+11 x X+6
[[~TERj
'FN lSTQ]
[I ~
:
._-_._--_.,
:r
3"
- ....-
.--l
.- ..
-~
..-.-
.-. -- ---
- ~ -. -- - . -
3:
2:
1:
Recall the function, enter the PLOT menu, and store it for plotting.
I USER] ~ FN ~
II;~:
J'
m::JI _
_ _ __
'W'3+6*W'2+11*X+6'
I PLOT I ~ sfEo ~
I~;
I M"!'~mm1~mrm'il$!J
Clear the plot parameters and plot the function.
'PPAR [PUR@
'" DRAW ",
l------~F~
~
]
"rv
I '.
_ .
..
--
___.
Equation
roc:>1S
16
Function Analysis
[] [iNS]
r--]
L_~__
[.J ilNS i
G:] [ifj]J
!~
mMl!mlo:m::JDmlImrm~
~nm
Note: Differences from the displayed results may appear due to slightly
different digitizing locations.
Now enter the:c SOlVR ~ menu and compute the three roots.
[__SOLIJl
~_.~J
~ SOlVR~
__ ~ __
~
I~'
2:
----- -~9,0)
S-1.9,0)
1.
,-3.1.0)
o:JfRffiIc:::Jc:::Jc:::Jc::J
Enter a guess from the stack and compute the root. Remember, to calculate the value of a Solver variable, press the shift key followed by the
appropriate variable key.
~x~
~ X~
1[:::
ill
-3 I
1:
o:JfRffiIc:::Jc:::Jc:::Jc:::J1
After obtaining the exact root, make note of it and prepare to locate the
next root. Discard the first root. Then repeat the process for the other two
roots.
[]Bop]
-- x =
-_ . -==
=
[ .J =x
--
..
Zero
1:
-2.00000. 0000061
o:JfRffiIc:::Jc:::Jc:::Jc:::J
Compute the last root.
[QriopJ
= x =: [J
--.~--=~
~-
In;:iro
iiiiii1
1:
-1 1
Di::::ltXf>&=Ic:::::Jc:::Jc:::Jqj
With the three roots located, find the extrema. The extrema are located by
finding the roots of the first derivative.
Recall the function.
[Q:~BJ [lJ..~~J ~ FN ~
2
3:
um~IrnII
Function Analysis
17
3
2;
I XA3+6*XA2+11*X+6 I
1:
DIiI1I.m.IrnII
_ _ _ I X'
3:
2:
1:
'3*XA2+6*(2*X)+11I
DIiI1I.m.IrnII
_ __
Idjdxl
'DRl ISTOI
3:
2:
1:
ID:.DIiI1I.m.IrnII
__
H /lVIS"
~ DR1 ~
2:
I ENTER I
IillTI
1:
I X 3+6*X 2+_
11 *X+6
ID:.DIiI1I.m.IrnII
_I
)
G
TO CI ;"po(Q ~CI?
3:
~ FN~
'T"V;"(~Oi\l'"
ecll~'O~lor1j
2:
1: '3*X A2+6*(2*X)+11=X A
3+6*X A2+11*X+6
' _
ID:.DIiI1I.m.IrnII
_
~ STEQ ==
= DRAW =
I"
GJ ... GJ
GJ ... GJ
IINS I
IINS I
IAnf.J]
3:
2:
1:
(-1.4,O)
(-2.6,O)
I'imImmlBmllDlilllmImlmD
18
Function Analysis
Recall the derivative and enter ~ SOlVR ~ to pinpoint the roots as above.
The computed values may differ slightly depending on the seed provided
as an input to the Solver.
IUSER I ~
~ =STEQ~
3:
~SOlVR=
o::::Jf]ffiJc::Jc::Jc::J
2:
1:
~~ac~I..a~~~~~~~ii~~~7biii~
~x ~
~ x~
<-1.4,0)
<-2.r,0),
derivorive 1kro
This is one of the roots. Recall the function and evaluate to get the functional value.
IUSERI ~ FN ~
IEVAll
3:
2:
<-1.4~0)
-2.57735026~17
1:
.3849001794
. .DIIIImllImII.mI_
Now repeat the process for the other root. First discard the root and function value.
IDROpl ~
!solvi = SOlVR ~
3:
2:
1:
<-1.1,0),
o::::Jf]ffiJc::Jc:::Jc:::J
~x ~
~ x~
(
IUSERI ~ FN~
IEVAl l
'0
exodl
rt
X)
IJ
rot>
f Co
ClV'Cl4:, fC'l(41
.... CiI"\I~c:. 'i ... 1"
1:
- 1. 42264973081
o::::Jf]ffiJc::Jc::Jc::Jc:::J
3:
2:
-1.42264973081
1:
-.38490017949
. .DIIIImllImII.mI_
The extreme values of the function have been located. Clear the stack and
find the inflection point. The inflection point, located at the root of the
second derivative, is the point or points at which the function changes concavity. That is, it changes from concave up to concave down. The second
derivative of a cubic is linear and has only one root. Therefore a cubic has
only one point of inflection.
Function Analysis
19
<
1
=
3:
2:
1:
IIi1DIIIJD.:mIm:JI
__
'X [ENTfFD
3:
2:
'3*X"' 2+6*<2*X)+11,
1:
'X'
IIi1DIIIJD.:mIm:JI
__
3:
2:
Id/dx l
1:
'3*<2*X)+12'
IIi1DIIIJD.:mIm:JI
__
'DR2
I STOI
3:
2:
1:
EmIli1DlIm1l.:mlm:JI_
Plot the function and its second derivative. Observe the location of the
root and how the function behaves at that point. It is coincidental that a
function root is located at the point of inflection. It remains only to repeat
the root finding procedure.
~DR2 ~
~ FN ~
3:
2:
1:
'3*<2*X)+12'
' X"'3+6*X"'2+ 11 *X+6 '
EmIli1DlIm1l.:mlm:JI_
ENTER 1
2:
1:
'3*<2*X)+12=X"'3+6*X'"
2+11*X+6'
EmIli1DlIm1l.:mlm:JI_
= DRAW =
20
Function Analysis
f-,
~. ,
;r:;r"
"~- '
o ...
IATTN I
[NS]
3:
2:
1:
(-2.1,O)
mMllmlmmlm:J:IBmmIJl1l1lID
lliSER I
~ DJ32 ~
3:
2:
(-2.1~0)
'3*(2*X)+12'
1:
EDlI!mIIIIlI1II~.:i3I_
~~~
= SOLVR=
3:
2:
1:
(-2.~,0)1
[J[]~c:::Jc:::Jc:::J
Enter the digitized initial guess and solve for the root.
~ x~
~ x~
~wo:c::J=~1
ISOLV I {' FN' , X' 'DRl ' , DR2 ' , PPAR' IPURGE I
Function Analysis
21
O=tan
m 2 -ml
1+mlm 2
~ :
j)C
Form a function that, given the slopes, computes the angle between two
functions at a point of intersection.
-+
'ANG
Isrol
2:
1:
a b 'ATANb-a)/
,
(1 +a*b
IilDlDllllmlrnaGmImlJll
3:
2:
1:
IilDlDllllmlrnaGmImlJll
Lines have a constant slope. Read the slope for each directly from the
given formula.
3 IENTER]
-2 IENTER I
3:
2:
1:
-2
IilDlDllllmlrnaGmImlJll
IUSER I = ANG =
22
3:
2: _ _ _ _ _
1Il:Ca
1:
45
Example: Find the angle formed by the tangent lines at the points of
intersection of the following functions.
F =3x +1
Y=2x 2
Enter and save the given functions.
ICLEA]i] G2J
, 3 X+ 1 [g.!fgli]r:EC:-N
=TE--R'"
4
3
2
'F
ISTO I
, 2 XA 2
'3*X+1'
--_. ]
I'~
IENTER I
[i~
-- ----- - ----- - - -
1:
'Y
ISTOI
'2*X A 2'
4
3
2
Plot the two functions to obtain initial guesses at the points of intersection.
First, set the two functions equal to each other.
IUSER I
~ y ~ ~ F~
~ ! ENTER I
3:
2:
A 2=3*X+1'
1: . . .EI:H
'2*X
.
_
__
23
13
2'
. I!
1:
o:iMmmlmmJlmllImIm~
Clear the plot parameters and draw the equation with the two functions.
'PPAR J:f3GE]
~ DRAW~
t~~
_ _ _ ._. .
_. ~
_~~_J
Digitize both intersection points. Enter the Solver to refine the guesses.
[J ... [J [INS [
~ ... 0 [TNS]
I.A:CrJ'l]
:=:soLv~
lliQill
~3.
<-.3,0)1
2:
11:
<1.9,7).
LHmlmmlmmJlmllImImmllIlJ
:b .
<-.3,0)1
2:
f' 7)11
1:
<1.
OOmfi)[]liJ[=:J[=:J
r ----
:=:x:=:
-1I
:
1
:
<-
OOmfi)[]liJ[=:J[=:J
T' )11
~
[J
:=.= x:=.=
~::~ ----I
L~
I
1:
1 7807764064
r--~_
OOmfi)[]liJ[=:J[=:J[=:J1
L.
1[::-- ---- -
1~
1 7807764064'1'
OOmfi)[]liJ[=:J[=:Jc::::J
:=.=X :=.=
24
- --
- ----,
~x~
~i9r1 ~oo~CiDi:fEJCffiJc:::Jc:::Jc:::J
1:
-.280776406405
..
~eversa
E
---------1
3:
2:
1:
1.7807764064
-.280776406405
'2*X"2'
3:
2:
1:
1.7807764064
-.280776406405
-1.12310562562
'X I ENTER I
@7~
3 [ENTEBJ
~
-.280776406405
1 2:
-1.1231_ 0562562
1:
3
..... 1IliW~. . . . .1I:I:l'II
13: --2:
1:
~.....
1. 78077640641
-.280776406;::1
-60.1164404136
1IliW~. . . . .1I:I:l'II
-- - - -- --- ---
---
This is in degrees.
Ready the stack to operate on the second intersection point.
LQROP]
[QRO~
IIf~.....
1.7807764:6:1
1IliW~ . . . . .1I:I:l'II
25
'X
ISTO I
32:.
ii...mmllmII. . . .
~ y ~
lil:DIj
3:
2:
1:
'2*X A 2'
. . mmllmII. . . .1il:DI
IENTER I
3:
2:
Id/dxl
1:
7.1231056256
. .mmllmII. . . .1il:DI
3:
2:
7.1231056256
1:
3
. .mmllmII. . . .1il:DI
3:
2:
= ANG",
1:
-10.443524758
. .mmllmII. . . .1il:DI
26
IPURGE I
Differential Calculus
This chapter includes problems of differential calculus, including minimizing functions, calculating tangent lines, and several methods of implicitly
differentiating functions. Several important features of the calculator are
highlighted, including creating user-defined derivatives, the use of keyboard algebra for solving complex problems, and effective use of flag 35
for symbolic evaluation of constants. For HP-28C users, this chapter also
describes use of user flag 59 (the infinite result flag).
Di.erentlal Calculus
Minimize Perimeter
Science, engineering, and business share the need to find the minimum
values of given functions as some parameter changes. In this section, the
function represents area, and the parameter is the area's perimeter.
~~--~--~---1
Note: HP-28C users must clear flag 59 to ignore "Infinite Result" errors
that may occur while plotting. Before proceeding, press the following keys
to clear flag 59.
59 CF ! ENTER!
2 xX + Y ! ENTER !
2
1
'2*X+Y'
2
1
28
lIinimize Perimeter
'2*X+Y'
'X*Y=200,
Isolate X.
I
IALGEBRA I
~ ISOL =
3:
2:
1:
'2*X+Y'
'201ZvY'
iliW!)1IIlIJIMm)mmJliIEjjl3ll'i!jj
'X
ISTO I
3:
2:
1:
'2*X+Y'
iliW!)1IIlIJIMm)mmJliIEjjl3ll'i!jj
IEVAL I
3:
2:
1:
'2*<200/Y)+Y'
iliW!)1IIlIJIMm)mmJliIEjjl3ll'i!jj
3:
2:
1:
'400/Y+Y'
KilDIli3IlCIlimillEmmli'!Dlmm
Compute the derivative. Roots of this will yield the mimimum value of Y.
I Y [ENTIRJ
Id(dx I
3:
I i ,- <400/Y"2)+l'
KilDIli3IlCIlimlllEmmli'!Dlmm
IPLOT I
I
~ STEQ =
PPAR I PURGE I
Iy
= INDEP =
3:
2:
1:
IImIllmlmmJImBlmImDD
lIini.ize Perimeter
29
The steps below expand the plotting area and draw the graph. If you have
no prior knowledge of the appearance of the graph, you may first wish to
plot the graph, modify the plotting area accordingly, and then plot the
graph a second time. (Press =:= DRAW =:= followed by IATTN I, and then
proceed with the steps below).
2
4
cs::i' '7,-1
~----
~ *H ~
~ *W ~
== DRAW ",
Digitize a seed for Y. Pick the guess near the positive root.
'>l
L.:::J
IATTN I
[2J
>
IINS ]
3:
2:
1:
(19.60,0.00)
HmlmMImmlmiElmImrntm
~y~
IE::'
ero
1:
20.00
o:::J~c::::::::Jc::::::::Jc:::Jc:::J
3:
2:
1:
20.00
10.00
o:::J ~c::::::::Jc::::::::Jc:::Jc::::::::J
Forty feet of fencing is required (two ends ten feet long and one side 20
feet long).
Purge the variables created in the example.
30
lIinimize Perimeter
The volume is
V=1rR2H
where R is the radius and H is the height of the can. To minimize the
surface area, the area is expressed in terms of either R or H, and that
expression is then differentiated with respect to that variable. Proceed by
isolating H in the volume equation and finding the root of the derivative
of the area taken with respect to R .
Clear the variables R, V, and H, and set flag 35.
ICLEAR I r<2l
{R V H I ENTER I
35 SF lfNTERI
l'.\JBJ
3
2
1
Factor out 21rR and key in the expression for the surface area.
I
2"'R'(~+H-)~
A I 8TO I
,t
':'RR+H)
31
lI~~]J
I-----~----~-----~~-
A"
13:
12:
il:
l ____
~_
_ _ ______
~_
'2*1T*R*(R+H) ,
'V=1T*R A 2*H'
Isolate H.
'H [Et-.JTj:lj
14"
i3:
12:
'2*1T*R*(R+H),
'V=1T*R A 2*H'
11 :
LAi..GI[~l ~IS-QU~
r~
'H'
~~~.
-~~---~---
3:
2:
--------~----~
,
'2*1T*R*<R+H) 'I
' V/ (1T*R A 2) ,
11 :
1~g\l~BlmI~~i
Store it as H .
'H [~I~I
r3:~~-.
'2
'
11 ;
,2*1T*R* (R+H) , i
Ii1iW!JDD~BlmI_~_~1
~2"
1:
_____ _______.____._ __
I
,
Ii1iW!JDDMmmBlmlI1.ImiImDIJ
~
=- ~~i~:1~~~~ ~ ~!~~~nt31
'R [~fiT~BJ
@jJiJ
1111
(1T*R A 2)A2),
I
i1iW!JDDMmmBlmlI1.ImiImD,
~------~~-----~-.~
Collect terms.
~COLCT~
[i:~(-i=2* (RA2*1T)A(::';2) i
*R*V*1T)*R*1T+2*(RA(-~
)*V/lT+R)*lT'
l~~~~~~i
LP1QYJ
~]t[Q]
13:---------------~-~~-~~
!2:
11 "
rn'iMlm!lmrnJmrnlImJIlllHilIl
_ _ _ __________
___
32
~ _~~
~_~ _~
~_ ~
One liter is the same as 1000 cubic centimeters. Enter the volume as
1000; the answer will be in centimeters.
1000 [ENTER I
'V [sTO I
ILmBDDmDEmmmDJ
Purge the existing plot parameters and expand the plotting area.
I PPAR [PURGE]
100 ~ *H ~
5 ~ *W ~
~i---~----------~-l
~!t1t1DD1tIa~_~~~
Note: HP-28C users must clear flag 59 to ignore "Infinite Result" errors
that may occur while plotting. Before proceeding, press the following keys
to clear flag 59.
59 CF [ENTER I
To find the radius that minimizes the area, specify R as the independent
plotting variable.
R
~ INDEP ~
2:
1 ::
HffiIlm!lmmJ~~1Hi1D
Draw the graph and digitize an initial guess for the Solver. -
~fbRAy;n~
!--- -
1(/
,.......------l
r--- ~--- -
-- - ----
~ ---
--
-- -- ~
~t
I~
1:
5.42I
'ITJCDEill2lc=:Jc=:Jc=:J
l
~ ___
~_ ___
_______ ___________ _ __
-,
I
i2:
5.421
:1 :
V/ Crr *R . . . 2 )
,L__
ITJCDEill2lc=:Jc=:Jc=:Jj
_ _____ _ ___ _ ______ _______ _ _ ____ __ ______ __
,
i3:
I '
33
IEVAll
3:
2:
1:
5.42'
' 1eee/(lT*29. 37) I !
CDCDtilffiIc::Jc::Jc:::Jj
Compute the area.
A IEVA!J
2:
1:
CDCDtilffiIc::Jc::Jc:::J
Evaluate to a numerical result.
I EVAL]
2:
1:
'leee/(lT*29.37),
' 2*lT*5. 42* (5. 42+ 101313
/(IT*29.37)),
CDCDtilffiIc::Jc::Jc:::J
Reduce the expression to a real number.
I--+NUM I
3:
2:
1:
5.42
'leee/(lT*29.37),
553.58
CDCDtilffiIc::Jc::Jc:::J
To check that this is a minimum, compute the second derivative.
I sOlv l ~ RCEQ ~
'R I ENTER I
3:
553.58
2: '2*( 1-2* (R . . . 2*lT) ..... ( -2 ...
1:
'R'
mMmMPEmlEilJl6l.'!m'lmmD
Id/dx l
3:
'leee/(lT*29.37),
2:
553.58
1:
37.713
mMmMPEmlEilJl6l.'!m'lmmD
I--+NUM I
The second derivative is positive; therefore, the curve is concave up. The
root is a local minimum.
Purge the variables created in this problem section.
34
Example: Find the two points on a circle of radius 1 that have tangent
lines passing through the point (2,2).
There are two expressions for the slope of the tangent lines - one from the
circle itself and the other from the point exterior to the circle.
Clear the working variables to ensure a symbolic answer. This problem
also demonstrates a simple error recovery procedure. To ensure that the
recovery works, turn on UNDO.
Note: The UNDO mode is set differently on the HP-28S and HP-28C.
Both sets of instructions are provided below.
Also note that the IMODE I display is quite different on the two calculators.
The displays used below depict the HP-28S [MODE I display. As shown
below, on the HP-28S a small box appears in the ~ UNDO ~ menu item to
indicate that it is on. On the HP-28C the = +UND = menu item is
highlighted when the UNDO mode is active.
I{'Y"R"
CLEAR I
B"A"EQ"X'
[PURGE]
---,i
IL~
~EIm:lIm:IGlDIml!IUimI
3:
HP-28S Keystrokes:
IMODE I
==--U-"N--DO=--~
HP-28C Keystrokes:
IMODE I INEXT I
~~
35
The general equation for a circle is x 2+y2 - r2 =0, where r is the radius.
Implicitly differentiate this equation.
Enter this equation for step-by-step differentiation. The "a" character is
obtained by pressing the I d/dx I key while entering an equation that begins
with the 0 key.
IENTER I
3:
2:
1:
'oX(X A 2+Y A 2-R A 2) ,
mmimmiIll!lJiDlGlDllImlllmI!J
2:
1:
IEVAL I
,'oX(X
2+Y A 2)-oX(R A 2)
mmimmiIll!lJiDlGlDllImlllmI!J
Step through the derivative, watching for the term representing the dy / dx
term.
2:
1:
IEVAL I
mmimmiIll!lJiDlGlDllImlllmI!J
IEVAL I
mmimmiIll!lJiDlGlDllImlllmI!J
2:
1:
,'OX(X)*2*X+OX(Y)*2*Y
1miIlm:ClliDlmDmmDImII
This is a critical step. Replace the derivative sub-expression with a variable that can be isolated. Count all characters, except parentheses and
quotes, up to and including the second partial derivative symbol (a). The
derivative symbol is the ninth item. Therefore "9" is used for making the
substitution.
9 [EN}ER]
'DY ~ EXSUB =
36
3:
2:
1:
'oX(X)*2*X+DY*2*Y'
1miIlm:ClliDlmDmmDImII
[EVALJ
3:
2:
1:
'2*X+DY*2*Y'
tiilml!llilClllmlmmt!lii!ilrnmil
Solve for
!!x.
dx
'DY ~ ISOL==
3:
2
1~
;J
'-(2*X/Y/2),
rnmtIHmJlM!lllln:m[iJEj]13im]
3:
2:
1:
'-(X/V)'
tiilml!llilClllmlmmt!lii!ilrnmil
This is the slope of any line tangent to the circle. Tangent lines that pass
through a point (A ,B) exterior to the circle have slope (y - B) / (x -A),
where the point (x ,y) is on the circle.
'(Y-B)--;-(X-A IENTER I
3:
2:
'-(X/V)'
1:
'(Y-B)/(X-A)'
tiilml!llilClllmlmmt!lii!ilrnmil
This line must be a tangent to the circle; that is, the expressions for the
slope must be equal.
~ I ENTER I
3:
2:
1: '- (X/Y)=(Y-B)/(X-A) ,
tiilml!llilClllmlmmt!lii!ilrnmil
2:
1:
'-(X/Y*Y)=(Y-B)/(X-A
)*Y'
tiilml!llilClllmlmmt!lii!ilrnmil
2:
1:
'-X=INV(-A+X)*(-B+Y)
*Y'
tiilml!llilClllmlmmt!lii!ilrnmil
37
~ EXGET ~
3:
2:
1:
'-A+X'
iliimIlnmlmlllllmmDmmiil!mm
2:
'-X=INV ( -A+XH-(-B+Y)
*Y'
iliimIlnmlmlllllmmDmmiil!mm
1:
EXGET =:
3:
2: '-X=INV(-A+X)H-B+Y...
1:
'-A+X'
iliimIlnmlmlllllmmDmmiil!mm
2:
1:
2:
1:
'- -A+X)*X)=(-B+YH-
Y'
tm:DIDmIlf:HlIEmmmIJlmm
3:
2:
1: '-(-A+X)*X=-B*Y+Y*Y'
tm:DIDmIlf:HlIEmmmIJlmm
= EXPAN =
3:
2:
1:
' (A-X)*X=-B*Y+Y*Y'
tm:DIDmIlf:HlIEmmmIJlmm
= EXPAN =
3:
2:
1:
'A*X-X*X=- B*Y+Y*Y'
tm:DIDmIlf:HlIEmmmIJlmm
38
3:
2:
1:
mBIlJ3mlm1llmIlti'l1i!B[m!I]
IENTER I
1
~ EXGET:=
3:
2:
1:
'-XA2'
rnm:aImJlE!'l!liElBImlMEDI!!m1
2:
1:
rnm:aImJlE!'l!liElBImlilE1]1!!m1
:= COLCT :=
3:
2:
1:
mBIlJ3mlm1llmIlti'l1i!B[m!I]
3:
rnm:aImJlE!'l!liElBImlMEDI!!m1
2:
1:
'A*X+B*Y=-(B*Y)+X 2+
YA 2+B*Y'
A
rnm:aImJlE!'l!liElBImlMEDI!!m1
= COLCT =
3:
2:
1:
mBIlJ3mlm1llmIlti'l1i!B[m!I]
The right-hand side of this equation is r2. Make a substitution for the
right-hand side.
12 [ ENTER I
==--~
'RA2 ~ EXSUB ~
3:
2:
1:
'A*X+B*Y=R A 2'
mBIlJ3mlm1llmIlti'l1i!B[m!I]
39
~ ISOL
- -~--
;J
3:
1;
'(R A 2-A*X)/B'
ii'.iiWI1i!l)II.!.WillIRmim:9Ii!m:Ii
'Y [SW]
.
L:
._-:.
3:
2:
1:
ii'.iiW~~Rmi[l]E!i~
.-.
.~.-~---
L:
I;
3:
'XA2+yA2-RA2'
ii'.iiWI1i!l)II.!.WillIRmim:9Ii!m:Ii
2:
1:
'XA2+( (R A2-A*X)/B)A2
_RA2'
ii'.iiWI1i!l)II.!.WillIRmim:9Ii!m:Ii
1:
'(A/B*2*(R A2/B)+S1*j
-(A/B*2*(R A2/B) A
2-4*2-A/B*2*(-(A/B
ii'.iiWI1i!l)II.!.WillIRmim:9Ii!m:Ii
1:
'(I(-(2*(2+2*AA2*B A(
-2*INV(B)*R A2) A2
-R A2+(-(2*A*B A(-2)
t!!lm1Dlil:J1mlII1iimI[!lJi!D1m!J]
1:
(I
t!!lm1Dlil:J1mlII1iimI[!lJi!D1m!J]
In the Solver, you can assign the numbers needed to complete the given
problem.
[Qill
~~
== SOLVR
40
3:
2:
1
:d
rnITJo:::JDD~c:::J
~ A ""
rb
b:x:oo::JOD~d
2 ~ s ""
<:::
'I:IW!JW
l E:bo::::Jo::JOD~c::J
::
I ~~IW
~ R ""
l~o::::Jo::JOD~c::J
There are two roots, one for each point on the circle.
1
:QlmimiiiI~iiiiii-iiiiiid
b
1:
~ S1 ~
CiDo::::Jo::JODfBI'~=Ic::J
=EXPR= =
Irr~7:'=:'~I?;
3:
------2:
1:
0.91
'(R A 2-A*X)/B'
l-':'-':'-=~
l:::"NUMI
-- -
L~OLV i ~ SOLVR ~
3:
2:
1:
0.91
-0.41
CiDo::::Jo::JOD~c::J
41
-1
I'" ---::m
S1 ~
Ell
11m
0.91
-13.41
1:
ITJITJITJDDEXffilc::::J
EXPR=
[&_"'2"'"
f
-0.41
-13.41
:
1:
ITJITJITJDDEXffilc::::J
Now compute the y coordinate.
I USERI ~y~
------------3:
2:
I->NUMI
-13.41
-13.41
1:
'(R 2-A*X)/B'
3:
2:
1:
-13.41
-13.41
13.91
The general solution approach solves the problem for any circle and any
exterior point.
Purge the variables created in this problem section.
{ 'X' 'Y' , A' 'B'
42
'R' , s l '
I PURGE I
rx +Vy
3, express
1; in terms of x
andy.
Create a user-defined derivative for the functiony (x). User-defined
derivatives must take two inputs from the stack; the definition below simply discards them and returns the variable DY, which can be isolated.
[ClEAR] ~
dx 'DY [ENTER]
-> X
4
3
2
"*
x dx
'DV'
ISTO I
~2:
3;1:
'VX
VY(X) -
IENTER I
4
3
2
1
'.J"x+.J"veX)-3'
'X
IENTER I Idjdx I
'DY [AlGEElRA]
~ISOL ~
2:
1:
'INVe2*.J"X)+DV/e2*.J"Ve
X'
1;.
'-eINV(2*.J"X)*e2*.J"VeX
)'
ill'mIlBl!lllmm::mlm!lDrmm~
43
3:
2:
1:
'-(!Y(X)/!X)'
~11lIIlrn~m:mMli!DIm!J]
'derY [PUB@
44
R (x)=J(n+ll(c)-n
(n + 1)!
sion. Since the sine function contains only odd-powered terms, look at the
difference in the 5th and 3rd degree approximations. For the sine function
the n + 1 derivative has a maximum of 1.
xn+l
ICLEAR I IMODE I
, SIN (X
X
~ RAD ~
IENTER I
[ENTER]
3:
2:
'SIN(X)'
1:
'X'
Ili:DmIDIlmIIEHDDUlID
IALGEBRA 1 ~ TAYLR =
2:
1: ,'X-0.17*X A3+0.01*X A5
lmDmal!l!J:mmmMEliImii
IENTER I
~ TAYLR ~
3:
2:
1:
'X-0.17*X A3+0.01*XA",
'X-0. 17*XA3'
lmDmal!l!J:mmmMEliImii
Taylor Series Enor Term
45
"'i
il'lmlDmllM!Iill1ml1I1MEli~
1: 'X-0.17*X A 3+0.01*X A 5
2
- (X-0. 17*X 3) ,
A
il'lmlDmllM!Iill1ml1I1MEliImm
Collect terms. The remaining expression is the 3rd degree error term.
== COLCT==
3:
2:
1:
'0.01*X A 5'
~I39mIlifDIimlME!I]lm!J]
[ENfER]
IENTER I
3:
2:
1:
'0.01*X 5=0.10'
A
~I39mIlifDIimlME!I]lm!J]
There are several ways to solve for x. The ISOL command will isolate x
in the displayed equation and result in a generalized expression for x . A
second approach is to use Solver to compute x . A third approach would be
to use the laws of algebra and the capabilities of the calculator to solve for
x "long-hand." All three methods are shown below; the third approach is
included to illustrate the power of FORM in the ALBEGRA menu.
Choose anyone of the three methods which follow, then proceed to the
"Conclusion" portion of this problem.
46
~ ISOL~
2:
1:
im!llHal!WiBmmtiIEIi~
Assign a value of zero to the arbitrary integer nl introduced into the isolation of the variable x .
o [ENTER]
I
nl ISTOI
2:
1:
im!llHal!WiBmmtiIEIi~
3:
2:
1:
(1.64,0.00)
im!llHal!WiBmmtiIEIi~
3:
2
1:
I'ilBIIiE3GIiillJIlImJ
_ 1.64
_
47
[32-~-------
--
.
1:
I~_~EfI::[_~T=
IC:][=::J~
[J
1!t~I-r
Now skip to the discussion and keystrokes labeled "Conclusion" to complete this problem.
r::-------------------------,
12:
11:
~,,~,;l~:7~~)k~1j,~!.*@l~j
Enter FORM, distribute the left hand exponential, and then associate the
5 and 1/5. Finally, collect terms in the expression.
~-, . FORM~
.
!------- -
----1
10. liJ"'TI/5)
:
l~~~~~~i
48
(0.01A(1/5~XA~)A~
~+-D~
1/5)=(0.10 A(T/5)
ImIIKDlIGilIIGlIIIllU.iWIrDII
[-4]
[-4]
::<
(0-.~1 A-~l_
/;) ) (X A 5
1/5)=(0.10 A(1/5)
~rnIrnIlY!illI~BaIm1l
~<0.01A<I/5*(X.(5'<1
/5=(O.10 A(1/5))
~ A-4 ~
1mII1Hml1GilI1GlII1llU.iW1rDII
~~-- - --
fA@]
L
':'_
~
_ COLCT
_ _ ~_
-l
:
[2
'0. 38*X=0if~' 1
1:
~rnIrnIlHH1IImmt!m!J]!m!D
Solve for x.
'X
~ISOL ~
. =:. .~,".l.J.i!
Conclusion: The variable x has now been isolated by one of the three
methods described above. Proceed with the remainder of this problem
solution.
The sine is symmetric, so R 3 <.1 for - 1.64 < x < 1.64. Check the result in
Solver.
[USEI3 ! ~ .A.f'Sj~~
2:
1.64
1:
' X- 0. 17*X 3 ' i
l!J_lt.JIlIIIII!I!II~IIIIIIIIII_-...i
SIN (X [i::-r\iiEBj
'X-0.17*X A 3, 1
'SIN(X)'I
~UI~_I111111111~-~
49
3:
2:
1:
[;] I ENTER I
1.64
'X-0.17*X A 3=SIN(X)'
~-----_... _._-------- -- - --
~ STEQ =
[Qb\Zl
------------
------
-_. _---- -- --
3:
2:
= SOLVR =
1:
1. 64
o::Ji:i:EliICffiJc:::Jc:::Jc:::J
p~
~-
~ x~
fuUllilI:iiEJ===:
..
----
= LEFT = =
- - - -- -- - - --
--- -
~r ;aJl*
- -- -
- -
---;
1:
0.90
o::Ji:i:EliICffiJc:::Jc:::Jc:::J,
.~U~:
= RT= =
..
_ _ _ _ __
::I.IIIl~mI~
2:0:90
1:
1.00
o::Ji:i:EliICffiJc:::Jc:::Jc:::J
Clearly the difference is .1. Now plot the two equations. Purge the current
plot parameters and draw the function.
[fillTI , PPAR
I PURGE I
~ DRAW ~
Exit from the IPLOT Iscreen and purge the variables created in this problem section.
l ATIN I
50
I pURGE I
Clear the stack. The first degree polynomial Taylor series expansion is the
tangent line at the point of expansion.
Enter {he function to be expanded.
JCLEAR I ~
I SIN (X r--I
E-NT-ER
- 'I
'SIN(X)'
Change the variable to correspond with the new center. That is, Y = 0
corresponds to X = 1.
I
Y+l [ENfER ]
4
3
'SIN(X)'
'Y+l'
2
1
~~ -
'X ISTO I
---::l
4
3
2
1
'SIN(Y+l)'
1 ENTER 1
JENTER I
4:
3:
2:
1:
'SIN(Y+1) ,
'Y'
1.00
51
3:
2:
1:
inrntlImllEWmmm[llE1i~
_---....._----
......
.;).
2:
'0.84+0.54*Y'
3:
2:
1:
'0.84+0.54*Y'
'Y+l=X'
.....
1:
[ENTER]
'Y+1'
'X
~~
'Y
I ENTER I
I ALGEBRA I ~ ISOL =
3:
2:
1:
'0.84+0.54*Y'
'X-l'
3:
2:
1:
inrntlImllEWmmm[llE1i~
'Y
I STO I
inrntlImllEWmmm[llE1i~
Change back to the original variable and simplify the resulting expression.
3:
[EvAL I
2:
1:
'0.84+0.54*(X-l),
inrntlImllEWmmm[llE1i~
= EXPAN =
2:
1: )'0.84+(0.54*X-0.54*1
,
1Dmrm:rnl!lmliEmlilliml!ll!i!D
= COLCT =
3:
2:
1:
1Dmrm:rnl!lmliEmlilliml!ll!i!D
52
e~. pression
----I
[ENTER]
3:
'STN ISTOI
1:
'0.30+0. 54*X'
[iilJiI1mI:l1lml1mDmfi!J1rmimi
8:------------1
'SIN(X IENTERI
[gJ:fuJ
I
'
I
[iilJiI1mI:l1lml1mDmfi!J1rmim
2
1:
I PLOl] ~ STEQ ~
'PPAR I PURGE I
'X ~EP~
'0.30+0. 54*X=SIN(X)
17~'C7<1
= DRAW =
Exit from the I PLOT I screen and purge variables X and Y for the next
problem section.
I ATTN I {'X' 'Y'
I PURGE I
53
Normal Line
In the previous problem section, the equation for the line resulted from a
Taylor series expansion. This problem section continues by manually
assembling the expression for the normal line.
Example: Calculate the equation of the line normal (perpendicular) to
the sine curve at x = 1.
~ ~STN ~
1@gBJ
l iNTER
3:
'0.30+0. 54*X ,
2:
'0.30+0.54*X'
1:
'0.30+0.54*X'
mm11I1M1Ri:11
_ __
1 [ENTER]
3:
'0.30+0.54*X'
2:
'0. 30+0. 54*X ,
1:. .mm11Im11Ri:11 _0.84
.
_
'X ISTO I
IEVAL I
This is Yo.
'X [P-LJRGEI
3:
'0. 30+0. 54*X ,
2:
'0. 30+0. 54*X ,
1:
mm11I1M1Ri:11
_ _0.84
_
3:
'0. 30+0. 54*X ,
2:
'0. 30+0. 54*X ,
1:
mm11I1M1Ri:11
_ 'Y-0.84'
__
ENTER 1
SWAP 1
Now form the right-hand side. Bring the original line in position to find
the slope.
1
SWAP 1
E-NT-E-o
R
'X
54
;=-1
Norlllal Line
3:
2:
'Y-0.84'
'0. 30+0. 54*X ,
1:
mm11I1M1Ri:11
_ _ _ 'X'
Id/dx l
3:
2:
1:
'0.30+0.54*X'
'Y-0.84'
_ _0.54
_
DIillI~IIEII
This is the slope of the tangent line. The slope of the normal line is
mn
=-- .
mt
Computem n
ICHS I
[lli]
3:
2:
'0.30+0.54*X'
'Y-0.84'
-1.85
__
_
1:
DIillI~IIEII
, X-I IENTER I
3:
2:
1:
'Y-0.84'
-1.85
_ _'X-l'
_
3:
2:
1:
'0.30+0.54*X'
'Y-0.84'
'-(1.85HX-l)'
_ __
DIillI~IIEII
DIillI~IIEII
CJ lQ!iliD
2:
1:
'0.30+0.54*X'
'Y-0.
, 84=- (1. 85HX-l)
DIillI~IIEII
_ __
Solve for Y.
'Y I ENTER I
3:
2:
'0. 30+0. 54*X ,
1: '-(1.85*(X-l+0.84'
-imDHlimM!I:IDmilDl'ilEiirnmi
_
._--- ---
t
3:
2:
1:
'0.30+0.54*X'
'-1.85*(X-l)+0.84'
~lDml!iDmmt!1l1m[1lmJ)
Normal Line
55
EXPAN ~
2'
COLCT =-
[.
'0,30+0,5:::]
1: '-1.85*X--1.85*1+
0.84'
tmmllllmlimllEmti'lli!Dlmm
-=-.
2:
1:
'0.30+0. 54*X ,
'2.69-1.85*X'
~lllImlimllEmti'lli!Dlmm
-- --..
.
I ENTER I
~ I ENTER I
IE~@ ~STEQ ~
'PPAR [PURGIl
'X == INDEP~
3:
----
2:
'0.30+0. 54*X ,
'2.69-1. 85*X=SIN(X) ,
tmmllllmlimllEmti'lli!Dlmm
1:
J
1 7C),~'C7"
r- -- ---- -- -.. -.-
Exit from the IPLOT Iscreen and purge the following variables.
Normal Line
----
~ DRAW~
56
Implicit Functions
The Implicit Function Theorem is, perhaps, the most elegant of three
methods shown for implicit differentiation. This problem section demonstrates a more general method for finding the equation of a line than the
previous problems sections.
Example: Find the equation of the line tangent to the function
x 2 +.xy -3=0 atx =1.
Begin by defining a function to compute the derivative of a general function F (x ,y). The formula, a result of the implicit function theorem, can be
used as long as
aF
~ 1= 0
holds.
Purge the variables that will be used in this example to ensure symbolic
solutions.
[CLEAR
I
{'x"y
4
3
2
1
[ENTER I
3:
2:
1:
a '-oX(a)/oY(a),
L .__ _ ___ _
Store the implicit derivatives function.
'IMP ISTO I
i -------J
'y=mx(x-X)+Y
[ENT~
4:
3:
2:
1:
'LINE ISTOj
'Y=M*(X-X)+Y'
4
3
2
1
Implicit Functions
57
'F ISTO I
Now find
1; in terms of X and Y.
'X . . . 2+X*Y-3'
ruSER I ~ F ~
3:
2:
1: .1EHI1mII _
'X A2+X*Y-3'
.
__
~ IMP~
2:
1: '-CaXCX A2+X*y)/aYCX A
, _ __
. .2+X*Y
1EHI1mII
Evaluate the expression until all the partial derivative symbols are gone.
IEVAL I
2:
1: '-cCaXCX . . . 2)+aXCX*Y
/CaY(X
. . . 2)+aYCX*Y),
..
1EHI1mII
_ __
IEVAL I
1: '-CCaX(X)*2*X A(2-1)+
(aX(X)*y+x*aX(Y)/(
. .aYCX)*2*XA(2-1)+(ayC
1EHI1mII _ _ _
IEVALI
3:
2:
1: .1EHI1mII
'-2*X+Y)/X),
.
_ __
This expression for the slope of F (x ,y ) at any point on the curve must be
the slope of the tangent line.
'm ISTO I
[ ..:=...:...
58
Implicit Functions
3:
2:
1: . . .IEIJImII
'X 2+X*Y-3'
.
__
o:= F==
~ ~ STEQ ~
~=~c:J==
== SOlVR =:
~X~
== EXPR= ==
.~~~~~1'1~""".
2:
1:
'4+2*Y-3'
[J[Jo::JEiiffilc:::::Jc:::::Jc:::::J
Solve for Y.
'Y IALGEBRA!
ISOl =
3:
2:
1:
-0.50
iliimII1I!mS!liEln:mJMEDoomi
'Y [STO[
3:
2:
1:
iliimII1I!mS!liEln:mJMEDoomi
With the coordinates of the point at the tangent line and the slope of the
line in terms of those coordinates, evaluate and simplify the formula for
the line.
[ USER [ ~ LINE ~
3:
2:
1:
'Y=M*(X-X)+Y'
_ _ 1EII1mII. . . .1EIJ
[EVAl[
2:
1: 'y=- 2*X+Y)/X*(x-2)
)-0.50'
_ _ 1EII1mII. . . .1EIJ
Implicit Functions
59
IEVALI
2:
1:
lA!&g@ = EXPAN =
3:
2:
1:
'y=-1.75*(x-2)-0.50'
~lllImlimlllmmME!Drmm
EXPAN ='
2:
1:
~lllImlimlllmmME!Drmm
3:
2:
1:
~lllImlimlllmmME!Drmm
60
IlIIplicit Functions
IPURGE I
Integral Calculus
This chapter solves a number of problems of integral calculus, including
integration of simple differential equations and computation of arc
lengths, surfaces, and volumes. Both symbolic and numerical solutions are
demonstrated with appropriate use of system flags.
Integral Calculus
61
Example: A stone is dropped from a bridge 100 feet above the water.
Calculate how long it takes to reach the water and its final velocity.
From Newton's 2nd law
F=mX .
Combining these,
..
-g.
ICLEAR I
'PPAR I PURGE I
100 ~ *H ~
(0, -70 =-==
PM:-::I::-:
N~=
3:
2:
-=
1
mmmmllDImlmlllmImlmIl
~ INDEP=
3:
2:
1:
mMmmllDImlmlllmImlmIl
62
Start by integrating the above equation. Let GRV be the acceleration due
to gravity. Since the expression to be integrated includes no TM terms,
the specified degree of the polynomial is zero.
'-GRV I ENTER I
'TM ~
I ENTER I
[1J
3:
2:
'-GRV'
'TM'
0.00
1:
mMl!mlmmIlmlIImImrnrnD
!l:::
3:
1:
'- (GRWTM>'
mMl!mlmmIlmlIImImrnrnD
va
[iJ
3:
2:
1:
'-(GRV*TM)+V0'
mMl!mlmmIlmlIImImrnrnD
'VEL I STO I
32:
1 '
~l!mImmIlmlIImImrnrnDI
Now recall the velocity and prepare for a second integration. The
integrand includes TM to the first degree, so a 1 is specified for the last
parameter to the integration.
l@iB]
~ VEL ~
'TM I ENTER]
1
[ENTER I
3:
2:
'-(GRV*TM)+V0'
'TM'
1IillIIIII1DilJI
_ _ _ 1.00
_
1:
[1J
3:
2:
1IillIIIII1DilJI
_
_
_ 2'
1:
' V0*
TM-_
GRV /2*
TW'
xa
[iJ
2:
1: 'V0*TM-GRV/2*TM 2+X0
,
1IillIIIII1DilJI
_ _ __
A
63
To put this in the standard form, use the expression manipulation capabilities in FORM.
[Al.GEBRA [ ~ FORM =
(~TM)-GRV/2)*(TM:1
2) )+X(t)
CilImlEIIilZlln'illlmIilRDl.n.,
[-L~
-----~.----=~
(VO*TM);GRV/2)*(TM
~2)+XO)
A
CilImlEIIilZlln'illlmIilRDl.n.
. -- ~ -- - --
-GRV/2)*(TMA2~(V~OI
~
*TM+XO)
. - - -- -- --- -
=+------+=
mmllGllllllGamDI~KDIIII
Exit FORM, make a copy, and save the expression for distance.
[AnN]
[gf-JTER [
'DST [[rQJ
~1 :
---- ---- 1
"
~1(II'rnImlimlmmmmlm!fJl
"
r
] ---[SOLV ~ TEQ}~
---
- -
~ SOLVR ~
-l
2:1 :
I
i
~[jffJ[]jD[]UtxB=1I
I!
32
~1 :
~~
I
I
,~~_~!JIi:Jt~Fi.::lq[
xo
'I
iI
:
,~rmoo
I1 :
i
[ill][ffi]Ui:J[]uERI&Elc::Ji
~--- -- ------ -------~~ - - ~-~ - - -~ - --. ,
..
--
~ VO ?;
F!SlI'WSlrpt5I
I f~
i
lL~Y u~l:]j[:I[]j[]~t'!.~=Jql
64
~rwii-n=m.Rr:mrmw
1:
'-(16*TM A 2)+100'
[]iill[ffiJ[]jDOiJDm:B2Ic:::::::J
To find the time required to hit the water, find a root of this equation.
Digitize an initial guess from a plot of the equation.
IPLOT I
=DRAW =
I INS I
II] [;]
2:
1:
'-(16*TM A 2)+100'
[]iill[ffiJ[]jDOiJDm:B2Ic:::::::J
~ TM ~
..
Solve for TM .
~ TM~
~~
Zero
1:
2.50
[]iill[ffiJ[]jDOiJDm:B2Ic:::::::J
The stone hits the water after 2.5 seconds. To find the velocity, recall VEL
and evaluate it.
I USER I ~ VEL ~
3:
'-(16*TM A 2)+100'
2:
2.50
EmIJJ.iW
___
_
1:
-80.00
IEVALI
65
'-9t\vt\"X
VmaXnA_
lcLEAFl]
2:
1:
] USER] ~ DST ~
'-(GRV/2*TM 2)+V0*TM
+X0'
A
.:ImE!:ll~~.m.1IlIm
Enter the ]SOLV] menu and store the equation for analysis, then enter the
Solver.
~ ~STEQ~
3:
2:
= SOLVR=
1:
mElDED[JijlJcmo~c::::J
= O.
~xo~
IC=CiD~=1
The initial velocity is 70 feet per second upward, and, therefore, positive.
70
~VO~
1~:::nJ
~DED[JijlJcmo~c::::J
The plot parameters were set in the previous problem. Plot both the velocity and the distance equations.
] USER] ~ DST ~
~VEL~
[ENTER]
2:
1: '-(GRV/2*TM A 2)+V0*TM
II!mIDIlIlI
_ _ __
+X0=-(GRV*TM)+V0'
--~DRAW~
6&
~"",I
The velocity is the first derivative of the distance; therefore, the root of the
velocity equation corresponds to a maximum of the distance equation.
Digitize the roots of the velocity (where the straight line crosses the x-axis)
and the distance (where the curve crosses the x-axis for the second time).
3:
2:
(2.30,-3.23)
(4.45,-3.23)
Bmll!mlo:m:JlmDmImmmI9
IINSI
1:
Recall the equation for velocity and save the equation for analysis.
IUSER I
~ VEL ~
3:
2:
(2.30,-3.23)
(4.45 -3.23)
ImDIDIiUII
_
_ __
1:
'-(GRV*tM)+V0'
~ ~STEQ =
3:
== SOLVR==
1:
2:
(2.30,-3.23)
(4.45.-3.23)
[WJc:m::J[]jDffiB2lc::Jc::J
Enter the initial guess for the root and solve for TM.
ISWAP I ~TM ~ D
~TM ~
~I-.:IIIU
_ _ _ _ _. 1
Zero
1:
2.19
[WJc:m::J[]jDffiB2lc::Jc::J
After 2.19 seconds, the stone reaches a maximum height. Recall the distance equation from the User menu and evaluate to find this height.
Ii&@
~DST ~
2:
1:
2.19
'-(GRV/2*TM A2)+V0*TM
+X0'
ImIIE!1IEIllmmJI.m.DDI
3:
2:
1:
i EVALl
(4.45,-3.23)
2.19
76.56
ImIIE!1IEIllmmJI.m.DDI
2:
1:
(4.45 -3.23)
'-(GRV/2*TMA2~+V0*TM
+X0'
ImIIE!1IEIllmmJI~HIII
67
~ ~ STEQ =
~SOLVR ~
3:
2:
1:
(4. 4j~;1\3( 23)
IJiWDBJU1DUiJ
=c::::J
~ TM ~
~ TM ~
Zer-o
i:i~I!~I:=[l;;:
_ _ _ _ _ _
1:
4.38
IJiWDBJU1DUiJi1iffi]c::::J
The rock hits the ground after 4.38 seconds. Note that this is exactly twice
the time required to reach the maximum height. Therefore the time spent
going up is equal to the time spent falling back to the ground. To find the
final velocity recall the velocity equation and evaluate.
IUSER !
~ VEL ~
3:
2:
4.38
EDlDIlIJt
_
_ __
1:
'-(GRV*TM)+V0'
3:
2:
4.38
EDlDIlIJt
___
_
1:
-70.00
IEVAL !
Note that this number differs from the initial velocity in sign only. The
rock's final speed is the same as its initial speed, but it is traveling in the
opposite direction.
Purge the variables created in this problem section.
{'TM"EQ"VEL"DST"GRV"XO"VO"PPAR'
!PURGE!
68
Double Integration
This problem section uses both symbolic and numerical integration to
solve common problems of integral calculus.
o '"
I I dy dx.
1 ",'
ICLEAR I
{ 'C' 'Y'
! PURGE! ~
r- --l
Ie dy where
e = 1. Because the result is simply y , you can choose to skip directly to the
evaluation of the integral at its limits if you wish. If so, simply enter Y,
and proceed to the steps below beginning with "Enter the upper limit."
Otherwise, prepare the stack for a symbolic integration with a first degree
result. Start by integrating a constant.
'C !ENTER!
'Y !ENTER!
1 !ENTER!
4
3
2
1
1.00
4
3
2
1
'C*Y'
'C'
'Y'
[]]
Double Integration
69
IENTER I
'C ISTO I
IEVAL I
4
3
2
1
'C*Y' I
li~
4
3
21
'Y'
-1
'x
'Y
IENTER I
ISTO I
Save a copy of the integrand for later use and evaluate the integral at the
limit.
[ENTER]
3
2
IEVALI
'Y'
'X'
, X" 2 IENTER I
'Y ISTO I
3
2
1
'Y'
'X'
Place a copy of the integrand in position for evaluation at the lower limit.
ISWAP I
IEVAL I
4
3
2
1
'X'
'XA2'
--
~:
70
4:
Double Integration
'X-X'2'
1 I ENTER]
4
3
2
1
{ x 0. 00
4
3
2
1
{ X 0. 00 1. 00 )
0.01
'X-XA2'
1. 00 )
. 005 [ENTER]
'X-XA2'
Evaluate the second integral. The error bound provides accuracy to the
number of displayed digits (assuming 2 ~ FIX ~).
[]]
--
~.
--:.a;E~~1
Double Integration
71
Example: Find the area enclosed by the parabola f (x) =x 2 and the line
y(x)=x +3.
The area between two curves can be found by computing the integral
b
J If (x) -y (x) I dx. In this problem the limits will be the intersection
a
ICLEAR I ~
'ABS(F-Y [fufgBJ
AREA Isro l
X 1\ 2
'F
Isro l
X+ 3
IENTER I
IENTER I
Isro l
2
1
~ ----- I
i
Ii
4
3
2
1
4
2
1
72
'ABS(F-Y),
-- ~
---]
'X+3'
'F=Y I ENTER I
Ii
'F~
[EVAL]
4
3
2
1
'X"2=X+3'
Store the equation and set the plot parameters. If you have no prior
knowledge of the graph of the curves, you can first draw the graph, exit
and modify the plot parameters as shown below, then proceed with a
second graph.
I PLOT I
~=
[:EmDmu__
'PPAR [~
5 ~*H~
The rightmost intersection point will become the upper limit. The leftmost intersection point is the lower limit. Draw the equation and digitize
the rightmost point first, followed by the leftmost point.
1;=0-'::' ItC:: j
~ DRAW~
W IINSI
3:
w .. 00!i~
lATIN
2:
1:
(2.30,5.50)
(-1.40,2.00)
HmlDmlum::JlImlImEmD!im
~x~
o -~X~
3:
2:
(2.30,5.50)
1:
(-1.t0'l.00)
c::LJiIffiJl:"ffiJc::::J
c::::J
-
!'1:t'9n 'Pv!rsal
-1. 30
c::LJiIffiJl:"ffiJc::::Jc::::Jc::::J
73
ISWAP I
Sign Reversal
1:
2.30
r::IJ[fffi][ffi]c:::Jc:::Jc:::J
::=: X :::=:
~x~
The limits are in the correct order for integration, but the variable is missing. Manipulate the stack to put it in place.
T
IENTERI
ISTACK I
~ ROLLD ::=:
3:
2:
1:
'X'
-1.30
2.30
1Em1m3l1!.l!lD~m:m::JaDii
3:
2:
1:
{ X -1.30 2.30 )
aDiiI!BElD!illmmlDmlI9lII
Recall the integrand.
IUSER I == AREA ==
3:
2:
1:
{ X -1.30 2.30 )
'ABS(F-Y),
"'DIiW~"'''EIRI
Put them in the necessary order.
ISWAP I
3:
2:
'ABS(F-Y),
1:
{ X-I. 30 2. 30 )
3:
2:
1:
'ABS(F-Y),
{ X -1.30 2.30 )
0.01
"'DIiW~"'''EIRI
Enter the error and integrate .
005
I ENTER I
"'DIiW~"'''EIRI
74
III
3:
2:
1:
7.81
0.04
"'DIlW~""EIRI
75
Arc Length
This section demonstrates keystroke and programming examples for computing arc lengths of rectifiable functions. The program ARC created in
-the second example is used in a later section entitled "Surface Area."
F(x)= (vxM+2)
3
fromx =0 tox =3.
fV1+f '(X)2 .
a
[;2J )
'X 2+2
[CLEAR [A
(3-'-2)
) +3
.
[ENTER [
'(XA2+2)A(3/2)/3'
'X
[ ENTER[
4
3
2
1
'(XA2+2)A(3/2)/3'
'X'
2
1
'2*X*1.50*(X A2+2)A
0.50/3'
Collect terms.
[ALGEBRA [ ~ COLCT =
3:
2:
1:
'(2+X A2)A0.50*X'
I!ElIml!llJ:ClI!IDDiDDmJI!I]lDiI!IJ
Square the derivative, add one, and take the square root.
~1~Q]
2:
1: '!(SQ2+X A2)A0.50*X
)+1)'
I!ElIml!llJ:ClI!IDDiDDmJI!I]lDiI!IJ
76
Arc Length
3:
2: '.f(SQ( (2+X A 2Y"0. 50* ...
1:
{ X 0.00 3.00 }
mmrm:rnHmllmDtm!lJlllmII
3:
2:
12.00
1:
0.06
mmrm:rnHmllmDtm!lJlllmII
Arc Length
77
2:
1:
[gIIJ
oomil131'il:JlimlllliimltllE!D1mm
I , V ( 1 +ax ( x) "2
x '{(1+6X(X)A2)'
'ARC [iQJ
3:
2:
1:
oomil131'il:JlimlllliimltllE!D1mm
The program below first stores the error in the variable ER , then converts
the next three levels of the stack to the list required for integration. The
function is then brought to level! and operated on by the ARC function.
Finally the function is returned to its position, and the error is recalled.
The integration completes the process.
'ER' STO 3 -tLIST
SWAP ARC SWAP ER
J IENTER I
mBllDmlll!mllDlmmlmDI
'ARCP ISTO I
2:
3:
1
mmlDmlll!mllDlmmlmDI
Computing the arc length of any function now only requires placing the
correct information on the stack. This program requires the function on
level 5, the variable of integration on level 4, the upper limit on level 3, the
lower integration limit on level 2, and the error bound on level 1.
'X"2'
IENTER I
78
'X' 0 2
Arc length
.005
3:
2:
0.00
2.00
~!fii~IIl!mIlDlI?!i'It;Zi
l UFlJ
~ ARCP ~
2;m.1iImII1JHI
4.651
[
1: :
_ _0.02
_
Purge the variable ER and, if you wish, the program ARCP. Program
ARC is used in the next problem section.
{ 'ARCP' 'ER'
[PURGE[
Arc Length
79
Surface Area
The function created to compute arc lengths can be extended to computing surface areas.
f 27rf (x YV1 + f
'(X)2 .
The square root factor in the integrand is identical to the ARC function
used in the problem section entitled "Arc Length." If you have not already
done so, key in the ARC function from the previous section. Enter the
integrand using ARC as a function.
ICLEAR I G2J
, 2x7rxFxARC (F
IENTER I
4
3
2
[ENTER]
4:
3:
2:
1:
'F
Isro l
4
3
2
1
'2*TT*F*ARC(F) ,
Purge the variable of integration to ensure that the name is not in use.
'X [PURGE]
2
1
IENTER I
4
3
( X 0. 00 1. 00 )
L-____________________~
80
Surface Area
005
4
3
2
1
3.81
0.02
ARC I
I PURGE I
Surface Area
81
t2
x(t)=Z
for t
=0
to t
= 4.
L =
pidx 2+dy2 .
a
ICLEAR I
'V(SQ(aT(X) )+SQ(aT(Y
I ENTER I
3
2
1
'!(SQ(~T(X+SQ(~T(Y
)'
ISTOI
, - - - - - - - - - ----- -
4
3
2
1
Enter the parametric equations. Store them under the names X and Y as
expected by the PARC function.
82
4
3
2
1
'TA2/2'
'(2*T+l)A(3/2)/3'
Ii
'Y ISTO I
'X ISTOI
__
2:
IUSER I =PARC=
1:
'.f(SQ(':'T(X) )+SQ(,:,T(Y
)'
...
. .ma_ _ _
4 [g~JTERI
3:
2:
'.f(SQ(dT(X) )+SQ(':'T<' ..
3:
'.f(SQ(dT(X) )+SQ(':'T<' ..
1:. . . .ma
{ T_
0.00_
4.00
.
_ }
Enter the desired error bound.
005
rENTER)
2:
{ T 0.00 4.00 }
1:. . . .ma _ _0.01
.
_
3:
2:
12.00
83
=!21rY";dx 2+dy2.
a
Example: Determine the surface area of the sphere formed by revolving a circle about the x axis.
x (t ) =2cos(t )
Y (t) = 2sin(t )
ICLEAR I 35 CF IENTER]
'2x1l'XYxPARC [ENTER]
3:
2:
1: . . .IIlIB'2*n*Y*PARC'
.
_ __
'2xSIN (T I ENTER I
3:
2:
'2*n*Y*PARC'
1: . . .IIlIB _
'2*SIN(T)'
.
__
'Y
ISTO I
'2xCOS (T [EfJfER]
'X ISTO I
3:
2:
1: . . .IIlIB'2*n*Y*PARC'
.
_ __
3:
2:
'2*n*Y*PARC'
1: . . .IIlIB _
'2*COS(T),
.
__
3:
2:
1: . . .IIlIB'_
2*n*Y*PARC
.
__ '
84
Key in the variable and limits of integration. With flag 35 cleared, 'If' is
evaluated to its numeric representation. The integration that follows
requires a non-symbolic representation. Convert the parameters into a
list.
T 0
'If'
IUSTI
IENTER I
3:
2:
1:
~~
'2*u*Y*PARC'
{ T 0.00 3.14 }
m:m1!!m~1mlID!iilm:m
IENTER I
3:
2:
1:
[IJ
0.04
1.89E-4
m:m1!!m~1mlID!iilm:m
85
f27rXF (x)dx .
a
Example: Find the volume of the solid formed by revolving the curve
F (x) =e"'"
l@MJ
!o!
, 2 x1!XXxF
[ENTER]
4
3
2
1
'2*1T*X*F'
ISTO I
I
I
~1
86
IENTER I
3
2
1
'EXP(-X'"' 2) ,
F tSTOt
__
3:
----J
-~~
.
__
1~ .1llmI _ _'2*u*X*F'
[ENTER]
2:
'2*u*X*F'
3:
.
_ }
1: .1llmI _
{ X_
0.00_
3.00
3:
'2*u*X*F'
2:
{ X 0.00 3.00 }
.
_
1: .1llmI _ _ _0.01
IT]
3:
2:
3.14
.
_
1: .1llmI _ _ _0.02
3:
2:
1:
3.1403
0.0158
~lim::Ilm1Irnal!mlmD
lUSER
== SHEL ==
{X 0 3 [ENTER
00005 [ENTER
t
3:
0.0158
2:
3.1412
.
_
1: .1llmI _ _ _
0.0002
IT]
Volume of Solid of Revolution: lIethod of Shells
87
{X 0 4 IENTER I
00005 I ENTER I
[I]
..
3:
2:
1:
0.0002
0.0002
3.1416
~----
This is indeed 'Jr to four digits. This process does not prove that the
integral, taken to infinity, converges to 'Jr. That proof requires an explicit
solution to the integral. The curve that was specified is, of course, the
"bell curve" used frequently in statistical analysis.
Purge the programs and variables used in this problem section.
{'SHEL' 'F
88
IpURGEI
Jtrf (x )2(}x
a
In general, for a given integral, the smaller the error bound the longer the
integration will take. The appropriate choice of error bound depends on
the problem being solved, but the method to reach a solution remains constant.
G2J
"2
'1I'XX
I CLEAR I
X
-
I ENTER I
3
2
'DSK
I STO I
x 'tr*x"2'
- ---l
Key in the second program. This program puts the function and integration parameters in the appropriate form on the stack and calls DSK for
the general form of the integrand. It then performs the volume computation.
'ER' STO 3.00 -LIST
SWAP DSK SWAP ER J
IENTERI
2:
'DSKP
I STOI
4:
2:
3:
1:
89
'X"2"X'
01.005
!ENTERJ
143
2
1
'X"
0.0000
1.0000
0.0050
= DSKP =
3:
2:
0.6283
1:
0.0031
1Gll1lEiD1m3I
__
_
The computed volume is .6283. The explicit solution to the integral is 'irIS.
For greater accuracy, increase the error bound as appropriate.
Purge the programs and variables created in this section.
{'DSK"DSKP"ER' !PURGE!
90