PRFactor

 The prime factors of a positive integer (or number) are the prime numbers that divide into that integer exactly, without leaving a remainder. The "If fPart(N/A)=0" checks for this (fraction part = 0) or no remainder.

home

  Introduction:   The prime factors of a positive integer (numbers that can be written without a fractional or decimal component) are the prime numbers that divide into that integer exactly, without leaving a remainder. The process of finding these numbers is called integer factorization, or prime factorization.
This program PRFactor was written by [Jimmy Salvatore  and referenced by [navyfalcon].
Note: Click on "PRFactor" to download the original program, then "right click" to extract the files and "F10" to load on "VTI".

prgmPRFACTOR

Line	Command or Statement	Comments
1.	ClrHome	Clear Screen
2.	Input "NUMBER=",N
3.	If N≤1	Error
4.	Goto 2	Stop
5.	Lbl 4
6.	While fPart(N/2)=0	Even Number
7.	Disp 2
8.	N/2->N
9.	Goto 4
10.	Lbl 3
11.	If N=1	Last Prime
12.	Goto 2	Stop
13.	For(A,3,iPart(√(N)+3),2	N≠1   :For (variable,begin,end[,increment])
14.	If fPart(N/A)=0
15.	Goto 1
16.	End
17.	Disp N
18.	Goto 2	Stop
19.	Lbl 1
20.	Disp A
21.	N/A->N
22.	If N=1
23.	End
24.	Goto 3	N≠1
25.	Lbl 2
26.	Stop

Screenshots

Prime Factors

TI-83/84 Basic Programs

Basic Programs

These small programs quickly find all prime factors of a given number

TI Basic Commands or Statements:

ClrHome

Clears the home screen.

Disp [valueA,valueB,valueC,...,value n]

Displays each value.

Else

Else following If.Then executes a group of commands if

condition is false (zero). End identifies the end of the

group of commands.

End

Identifies end of For(, If-Then-Else, Repeat, or While loop.

:For (variable,begin,end[,increment])

:commands

:End

:commands

Executes commands through End,

incrementing variable from begin by increment until variable end.

fPart(value)

Returns the fractional part or parts of a real or complex number,

expression, list, or matrix.

Goto

label Transfers control to label.

:If condition

:commandA

:commands

If condition = 0 (false), skips commandA.

 

:If (condition)

   :Then

   :commands

   :End

   :commands

Executes commands from Then to End if condition = 1 (true).

:If (condition)

   :Then

   :commands

   :Else

   :commands

   :End

   :commands

Executes commands from Then to Else if condition = 1 (true);

from Else to End if condition = 0 (false).

iPart (value)

Returns the integer part of a real or complex number,

expression, list, or matrix.

Lbl

label Creates a label of one or two characters.

Prompt [variableA,variableB,...,variable n]

Prompts for value for variableA, then variableB, and so on.

Stop

Ends program execution; returns to home screen.

While (condition)

   commands

   End

   command

Executes commands while condition is true