Threaded Mode | Linear Mode

John Keith · (This post was last modified: 02-07-2019 02:43 PM by John Keith.)

The 50g's POWMOD command uses the CAS variable MODULO for the modulus. Joe Horn posted a program for another calculator (the Prime, I think) that accepts a user-input modulus but I can't find it at the moment. Here is my 50g version:

Code:

\<< PUSH CASDIR MODULO \-> M

  \<< MODSTO POWMOD

    IF DUP 0 <

    THEN MODULO +

    END M MODSTO POP

  \>>

\>>

Input is x, y, m to return (x^y) mod m.