Post Reply 
Happy Pi Day!
12-13-2021, 01:21 AM
Post: #13
RE: Happy Pi Day!
A nice program I copied somewhere — possibly in this forum — in my HP50G :

\<< -105 CF 0 \-> N R
\<< 280000 N ALOG * DUP 'R' STO 2 \-> y
\<<
DO y * y 1 + IQUOT 50 IQUOT DUP 'R' STO+ 2 'y' STO+
UNTIL DUP 0 ==
END DROP
\>> 30336 N ALOG * DUP 'R' STO+ 2 \-> y
\<<
DO 9 * y * 6250 IQUOT y 1 + IQUOT DUP 'R' STO+ 2 'y' STO+
UNTIL DUP 0 ==
END DROP R
\>>
\>>
\>>

Fast and works fine.
Find all posts by this user
Quote this message in a reply
Post Reply 


Messages In This Thread
Happy Pi Day! - Gerson W. Barbosa - 03-14-2020, 02:08 AM
RE: Happy Pi Day! - pinkman - 03-14-2020, 06:19 AM
RE: Happy Pi Day! - Gerson W. Barbosa - 03-14-2020, 02:53 PM
RE: Happy Pi Day! - rprosperi - 03-14-2020, 05:04 PM
RE: Happy Pi Day! - Jim Horn - 03-14-2020, 05:15 PM
RE: Happy Pi Day! - Gerson W. Barbosa - 03-14-2020, 12:17 PM
RE: Happy Pi Day! - Dave Britten - 03-14-2020, 12:47 PM
RE: Happy Pi Day! - BruceH - 03-15-2020, 11:32 AM
RE: Happy Pi Day! - Eddie W. Shore - 03-15-2020, 07:29 PM
RE: Happy Pi Day! - DM48 - 12-12-2021, 06:44 PM
RE: Happy Pi Day! - Albert Chan - 12-12-2021, 11:04 PM
RE: Happy Pi Day! - Gerson W. Barbosa - 12-13-2021, 12:41 AM
RE: Happy Pi Day! - DM48 - 12-13-2021, 01:54 AM
RE: Happy Pi Day! - Gil - 12-13-2021 01:21 AM
RE: Happy Pi Day! - Gerson W. Barbosa - 12-13-2021, 03:57 AM



User(s) browsing this thread: 1 Guest(s)