Math Program Ideas
|
Post your ideas for new math programs here, or build on ideas posted by other visitors.
|
|
Reply to this item
|
Re: Math Program Ideas
|
Harrington ricks
|
I would like someone to make a math program for numerical analysis for advanced math classes. I do know this would be an easy program to make, although, I need to know how to start it and if someone could show me how to start it, I could make one and then put it on the site. I have a TI-83 or TI-92 Plus. So if you have any ideas, contact me asap.
|
|
27 December 2003, 20:09 GMT
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Re: Re: Re: Re: Re: Math Program Ideas
|
chris w
|
another option, with both formulas in one BASIC program for the ti-83+
Prompt L1,L2
Menu( "welcome", "midpoint",MP, "distance", DI, "exit",X)
Lbl MP
DelVar L3
(L1(1)+L2(1))/2 -> L3(1)
(L1(2)+L2(1))/2 -> L3(2)
Disp L3
Stop
Lbl DI
sqrt( (L1(1)-L2(1))^2 + (L1(2)-L2(2))^2) ->D
ClrHome
Output( 1,1,D)
Output( 2,1,"sqrt(")
Output( 2,3,D^2)
Stop
Lbl X
Stop
It may be a bit long, but it gets the job done well.
Note: the spaces are not part of the program
|
|
8 April 2005, 22:33 GMT
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Re: Re: Re: Re: Re: Re: Re: Re: Math Program Ideas
|
chandragupta
|
Here it the program I wrote for slope, midpoint, and distance. not that yours wont work, i just think that mine is a little easier to understand for beginners. it is as follows:
:disp "(x,y),(a,b)"
:prompt X,Y,A,B
:B-Y->C
:A-X->D
:if D=0
:then
:disp "NO SLOPE"
:Else
:Disp "SLOPE"
:Disp C/D ->frac
:End
:sqrt(C^2+D^2)->E
:Disp "DISTANCE",E ->frac
:((X+A)/2)->F
:((B+Y)/2)->G
:Disp "MIDPOINT (X,Y)",F,G
Thats all there is to it
|
|
6 December 2005, 02:30 GMT
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Chill out.
|
nemo123
|
Seriously, don't be a butt.
You say he never assigned R a value, and that you can't just 'store' something ( sqrt(X^2+Y^2)-> )
Using basic problem solving skills, i bet you he meant to say:
sqrt(X^2+Y^2)->R
I know, big leap right?
Anyway, how to TRULY write a slope/midpoint/distance program:
ClrHome
Disp "(A,B) (C,D)
Prompt A,B,C,D
D-B->X
C-A
Disp "DISTANCE",R>Pr(X,Ans
Disp "MIDPOINT", {(C+A)/2,(B+D)/2
If Ans:Then
Disp "SLOPE",X/Ans
Else
"NO SLOPE
That, ladies and gentleman, is the most optimized for memory program you will find.
If you are uncertain what R>Pr is, it is #5 under [2nd][APPS] or the ANGLE menu.
|
|
31 March 2010, 22:27 GMT
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Re: Re: Re: Re: Re: Re: Re: Re: Re: Math Program Ideas
|
Vminch
|
Dude, all you need to get MP and DI is the same 4 prompts.
So:
::"DIST
:ClrHome
:Prompt X,Y,Z,T
:(Write your own formulas, I have a science fair project I should be working on... Find both DI and MP with them.)
:round(D,5)->D
:round(M,5)->M
:Disp D,M
:Pausde
:End
Gets the job done nicely, not pretty, but efficient. You can even cut out the round func and make a cool
:Output(5,1,"Distance:")
:Output(5,11,D)
:--- Same thing on the next line for Midpoint
|
|
10 May 2007, 00:36 GMT
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Re: Re: Re: Re: Re: Re: Math Program Ideas
|
BluePhoenix
|
So it would look sort of like this
:Prompt L₁,L₂
:Menu("WELCOME", "MIDPOINT",MP, "DISTANCE",DI, "EXIT",X)
:Lbl MP
:DelVar L₃
:(L₁(1)+L₂(1))/2 → L3(1)
:(L₁(2)+L₂(1))/2 → L3(2)
:Disp L₃
:Stop
:Lbl DI
:√( (L₁(1)-L₂(1))²+(L₁(2)-L₂(2))²) → D
:ClrHome
:Output( 1,1,D)
:Output( 2,1,"√(")
:Output( 2,3,D²)
:Stop
:Lbl X
:Stop
|
|
23 September 2011, 17:43 GMT
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Re: Re: Re: Re: Re: Math Program Ideas
|
Groene07
|
:I'm not saying anyones ideas here are not the best way to go about this program,but i made one without having to input A,B,C,or D more than once. After typing in the X and Y values it will display The distance, and when you press enter it displays the Mid-point, and finally with another press of the enter button it will display the slope as well. (MADE ON TI 84+)
Lbl A
Prompt A,B,C,D
Sqrt((B-A)^2+(D-C)^2)->A
((A+B)/2)->B
((C+D)/2)->C
(D-C)/(B-A)->D
ClrHome
Disp "DISTANCE"
Disp A
Pause
ClrHome
Disp "MID POINT"
Disp B,C
Pause
ClrHome
Disp "SLOPE"
Disp D
Goto 1 (NOTE:The goto 1 is referring to another part of the larger program itself and if you made this by itself i would have it go to Lbl A.)
|
|
23 March 2007, 15:36 GMT
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Re: Re: Re: Re: Re: Re: Re: Math Program Ideas
|
nemo123
|
Alright. 450 mb? blow your mind:
*R>Pr is located under [2nd][APPS]
ClrHome
Disp "(A,B) (C,D)
Prompt A,B,C,D
D-B->E
C-A
Disp "DISTANCE",R>Pr(E,Ans
Disp "MID PT",(C+A)/2,(D+B)/2
If Ans:Then
Disp "SLOPE
Pause E/Ans
Else
Pause "NO SLOPE
This is 125Mb maximum, depending on the length of the program title.
|
|
20 March 2010, 17:23 GMT
|
|
|
|
|
|
|
|
|
|
|
Re: Re: Re: Re: Math Program Ideas
|
slope1.5
|
I made a program called slope15 that is the ultimate xy plane line/point analyzer. It first asks you to input a line in one of three forms: two points, slope/point form, or standard form. It then gives lots of info about the line, I.E. slope midpoint, length, distance from intercepts, intercept location, etc.. Then you can chose from a set of functions. You can make a new line and compare it to the first (parallel, perpindicular, bisectors, etc.). You can input a point and it will tell you it's location in relation to the first line. You can find X(Y) or Y(X). Many other things can be done with combinations of the functions. I don't currently have a link cable but I will post it when I do.
|
|
20 March 2006, 02:22 GMT
|
|
|
|
|
|
|
|
|
|
|
Math Program Ideas: Midpoint and Distance Formula
|
[UAC]Felix
(Web Page)
|
You are in luck! I have just made a Prgm recently that calculates the midpoint of point A(X1,Y1) and point B(X2,Y2),their midpoint, and most difficult: the location of point B(X2,Y2) given point A's location and the Midpoint. I should have it on my gaming clan's url shortly, as soon as I manage to debug the program. For now, I can give you the essentials:
The distance is the number of units between two points, as you know.
To find the distance, it is best you have a calculator;
BECAUSE MY COMPUTER DOESNT HAVE THE NEEDED CHARACTERS, I WILL USE WORDS!
vAv vBv
d=the square root of((X1-Y1)^2+(X2-Y2)^2)
If you wish, you can make the program yourself by doing something like:
:ClrHome
:Input "X1=",S
:Input "Y1=",D
:Input "X2=",F
:Input "Y2=",G
:[Enter the formula given above]
:Ans
The midpoint finder is on my calculator, which I left in my locker... Check my site soon and often!
|
|
21 January 2007, 00:36 GMT
|
|
|
|
|
|
|
|
|
|
|
Re: Re: Re: Re: Math Program Ideas
|
UselessBob
|
Personally, I use this on my 89. Two separate functions, quite easy to use and/or adapt for other calcs.
Midpoint:
m(x,y,z,t)
Func
({x,y}+{z,t})/2
EndFunc
Distance:
d(x,y,z,t)
Func
?((z-x)^2+(t-y)^2)
EndFunc
I like a simple approach.
|
|
10 May 2007, 02:37 GMT
|
|
|
|
|
|
|
|
|
|
|
Re: Re: Re: Re: Math Program Ideas
|
Mark Vander Stel
|
Here's a way to get slope, y-intercept, midpoint, and distance at the same time. It is kind of lengthy, but works great with a great interface (unless the numbers are huge).
:ClrHome
:Input "X1:",A
:Input "Y1:",B
:Input "X2:",C
:Input "Y2:",D
:Disp " "," ","
:(V-X)^2+(W-Y)^2->A
:If V=X
:Then
:Output(3,7,"None
:Output(4,7,"None
:1->N
:Goto N
:End
:(W-Y)/(V-X)->B
:Y-B*X->C
:Output(4,7,C
:Lbl N
:Output(1,1,"X1=
:Output(1,4,V
:Output(1,9,"Y1=
:Output(1,12,W
:Output(2,1,"X2=
:Output(2,4,X
:Output(2,9,"Y2=
:Output(2,12,Y
:Output(3,1,"Slope:
:If N/=1
:Output(3,7,B
:Output(4,1,"y-int:
:Output(5,1,"Midpt:X=
:Output(5,9,(X+V)/2
:Output(5,12,"Y=
:Output(6,1,"Dist:
:If int(√(A))=√(A
:Then
:Output(6,6,√(A
:Else
:Output(6,6,"√(
:Output(6,7,A
:Output(7,6,√(A
:End
√ is the square root sign
-> is the store function
^2 is the squared function
I know this is long, but it gives you all you need to know. If you have any improvements or additions, please let me know.
|
|
13 November 2009, 20:12 GMT
|
|
|
|
|
|
|
|
|
|
|
Re: Re: Re: Re: Math Program Ideas
|
Endlessthought314
|
Here is a distance program:
:ClrHome
:Output(2,1,"DISTANCE BETWEEN A,B and D,C"
:Pause
:ClrHome
:Prompt A,B,C,D
:((C-A)^2 + (D-B)^2)^(1/2)->M
:Output(5,1,"DISTANCE:"
:Disp M
|
|
14 November 2013, 05:03 GMT
|
|
|
|
|
|
|
|
|
|
|
Re: Re: Re: Re: Math Program Ideas
|
Endlessthought314
|
This is a program for distance and midpoint:
:ClrHome
:Output(2,1,"DISTANCE BETWEEN A,B and D,C AND MIDPOINT"
:Pause
:ClrHome
:Prompt A,B,C,D
:((C-A)^2 + (D-B)^2)^(1/2)->M
:Output(5,1,"DISTANCE:"
:Disp M
:(A+C)/2->X
:(B+D)/2->Y
:Pause
:ClrHome
:Disp "MIDPOINT:"
:Disp "X IS:",X
:Disp "Y IS:",Y
|
|
14 November 2013, 05:20 GMT
|
|
|
|
|
Re: Re: Math Program Ideas
|
Matt Modica
|
Hello all, I have a TI-83+ and need some help with a program I am making.
I have a program that draws a circle with circledraw(0,0,1).
I want to be able to calculate calculate the points on the circle when the angle is 30*, 45*, 60*, 90*, 120*, 135*, 150*, 180*, etc..
The catch is that I need the points to be in simplest radical form (not floats). Any idea on how I would go about doing this?
I know that I use sine and cosine to calculate the points. for example:
coordinates for 60*
ClrHome
Degree
Input "Enter angle: ", I //Enter 60 here
cos(I) -> X
sin(I) -> Y
Output(3,1,"(")
Output(3,2,X)
Output(3,5,",")
Output(3,6,Y)
Output(3,9,")")
Stop
Radian
End
...but I don't know how to put them in simplest radical form.
Home or drawing screen can be used to display the points, I have no preference. Thanks!
|
|
27 November 2008, 01:35 GMT
|
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28
You can change the number of comments per page in Account Preferences.
|