$ ***************************G ***** NEWTON'S METHOD *****j ***** BY CHRIS HAYNES ***** ***** 11-13-88 ***** ***************************"";:53281,0:53280,2:53272,23 A$"EWTON'S ETHOD""" L(A$)  N1 L, (12N);(A$,N,1)< -T175: TD 2 Nn <" IT NY EY " F Z$: Z$"" 70 d""; n"HIS PROGRAM USES EWTON'S METHOD FOR" x"APPROXIMATING ROOTS OF EQUATIONS." " HE EQUATION USED IS OF THE FORM":1 " F( )"L " N"y " = - --------- N=1,2,3,..." " N+1 N F'( )" " N" "N INITIAL GUESS IS USED ALONG WITH " "SOME ERROR TOLERANCE."& " IT NY EY "= Z$: Z$"" 185n " HE EQUATION FOR F() MUST BE INPUT " "ON LINE 350. HE EQUATION OF F'() MUST" "BE INPUT ON LINE 360." "HEY SHOULD BE OF THE FORM :" "350 =2*(^3)+3*+5" "360 =6*(^2)+3"B " XAMPLE OR: 3 "i " = 2 + 3 + 5 " " HE TOLERANCE SHOULD BE SOME SMALL" "NUMBER. (I.E. .00001)" " F THE INITIAL GUESS IS CLOSE TO THE" "REAL ROOT, IT WILL CONVERGE FOR THIS". "TOLERANCE MORE RAPIDLY."T " RE EQUATIONS INPUT ? (Y/N)"k Q$: Q$"" 244 Q$"Y" 299 Q$"Y"Q$"N" 244 "";:53272,21 " INPUT EQUATIONS" 350360 + *** MAIN PROGRAM ***@"";:53272,23(J"NTER ERROR TOLERANCE";ET:O ET1 330WT"NTER INITIAL GUESS";X`YIT0s[ H1 1000000}^Y2XhDY2mITIT1rNX(YDY)w"APPROX VAL = ";N| (NX)ET 900XN H " FTER ";IT;" ITERATIONS THE ERROR WAS LESS THAN ";ETH"ND THE APPROXIMATE ROOT WAS ";Nk" NOTHER ?(Y/N) "; R$:R$"" 930 R$"Y" 5 R$"N"  R$"Y" R$"N" 930