HP Forums

Full Version: (12C) Same years ?
You're currently viewing a stripped down version of our content. View the full version with proper formatting.
Hello,

This program searches for the years which will be identical to the one given in parameter (same days of the week all year round).

R/S
2021
R/S

Display : 1.012021 (2021 is like 2021 !)
R/S
1.012027 (2027 is like 2021)
R/S
1.012038 (2038 is like 2021)
R/S
...
Code:

01  f Σ
02  R/S
03  1 EEX 6 CHS
07  STO 0
08  ×
09  1.01
13  +
14  STO 1 STO 2
16  STO 3 STO 4
18  .02 
21  STO + 2
22  STO + 4
23  RCL 1 RCL 3
25  ΔDYS
26  7 ÷
28  Frac
29  RCL 2 RCL 4
31  ΔDYS
32  7 ÷
34  Frac
35  x⇌y
36  R↓ 
37  + 
38  x = 0
39  GTO 43
40  RCL 0
41  STO + 3
42  GTO 22
43  RCL 3
44  R/S
45  GTO 40

Explanations (in french with subtitles) : https://youtu.be/GKpPRt_K-bk
Reference URL's