# HP Forums

Full Version: (12C) Maximum Size of Square Area in a Rectangle
You're currently viewing a stripped down version of our content. View the full version with proper formatting.
This program calculate the exact "Maximum Size of the Square Area" and
how many Squares fit inside a Rectangle.

Procedure:
Given size of the Rectangle is

Length = 6
Width = 4

6 ENTER 4 // This input can be switch around (4 ENTER 6)
R/S --> 2 // Answer for the maximum square size
R/S --> 6 // Answer for how many square fit inside a rectangle

Program: Maximum Square Area inside a Rectangle
Quote:01 STO 1
02 X<>Y
03 STO 2
04 x
05 STO 3
06 RCL 1
07 RCL 2
08 X≤Y?
09 X<>Y
10 X<>Y
11 - // Subtraction or minus sign
12 LSTx
13 X<>Y
14 X=0?
15 GTO 17
16 GTO 08
17 X<>Y
18 R/S
19 ENTER
20 x
21 RCL 3
22 X<>Y
23 ÷
24 GTO 00

Gamo
(07-11-2018 05:00 AM)Gamo Wrote: [ -> ]This program calculate the exact "Maximum Size of the Square Area" and
how many Squares fit inside a Rectangle.

I am not sure if you have realized it, but this maximum square size simply is the Greatest Common Divisor (GCD) of the two numbers. So you can use the GCD program posted some time ago instead.

On the other hand the current program can be improved. Take a closer look: you store the input in R1 and R2 but then these two registers are only used once to recall the original input before the loop starts.

He is another version:

Code:
```01 STO 0 02 X<>Y 03 STOx0   // store a*b in R0 while the input in X and Y is preserved 04 X≤Y? 05 X<>Y 06 X<>Y 07  - 08 X=0? 09 GTO 13 10 LSTx 11 X<>Y 12 GTO 04 13 LSTx 14 STO÷0   // divide a*b by (square size)^2 15 ST0÷0   // and keep the result in R0 16 RCL 0 17 X<>Y 18 GTO 00```

Example:

4 [ENTER] 6
[R/S]   => 2
[X<>Y] => 6

Dieter
Reference URL's
• HP Forums: https://www.hpmuseum.org/forum/index.php
• :