HHC 2017 RPN Programming contest information and results thread
|
09-23-2017, 04:31 PM
Post: #46
|
|||
|
|||
RE: HHC 2017 RPN Programming contest information and results thread
Winning RPN Program entry HHC 2017 by Roger Hill.
70 bytes LBL "HAPPY" "UN" ABS CLST LASTX X<>Y LBL 01 RDN ISG Z LBL 02 10 / ENTER FRC X^2 STO+ Z RDN INT X != 0? (X NOT EQUAL TO ZERO) GTO 02 X<>Y 2 10^X * 4 X=Y? GTO 03 SIGN X !=Y? (X NOT EQUAL TO Y) GTO 01 CLA LBL 03 |- "HAPPY " (APPEND HAPPY AND A SINGLE SPACE) FIX 0 CF 29 ARCL T FIX 4 SF 29 AVIEW END |
|||
« Next Oldest | Next Newest »
|
User(s) browsing this thread: 3 Guest(s)