AlgNet/GeoNet: A Union City School District Summer Enrichment Program
Using technology not simply to do things better, but to do better things.

LEAST COMMON MULTIPLES

This program determines the LCM for two given values. How does its use help you to find answers to the questions involved in Paper Cranes.

PROGRAM:LCM

:ClrHome
:Disp "TWO VALUES"
:Input A
:Input B
:0 F
:1->N
:Repeat (F<>0)
:If int(A*N/B)=(A*N/B)
:Then
:1->F
:Else
:1+N->N
:End
:End
:ClrHome
:Output(1,1,THE LEAST COMMON")
:Output(2,1,"MULTIPLE FOR")
:Output(4,3,A)
:Output(4,6," and ")
:Output(4,12,B)
:Output(6,1,"IS")
:Output(6,7,A*N)

Notes:

  1. The symbol -> represents the STORE command.
  2. The symbol <> represents NOT EQUAL found in the TEST menu.

Return to Programming the TI-83
THE MATH FORUM: Creating community, developing resources, constructing knowledge...