A klasszikus rekurzív algoritmus példa Casio programozható grafikus számológépen: faktoriális számítás. Két programból áll, a Factrun-nal kell indítani, a Fact pedig maga a rekurzív szubrutin, amely önmagát hívja meg. Sajnos csak 10 mélységig működik, utána "Ne Error" hibaüzenetet ad (legfeljebb 10 mély lehet a rekurzió a Casio számológépeken).
Még több példaprogram található a Számológép Fórumon.
Program "FACTRUN"
"FACT"? -> N;
1 -> F;
Prog "FACT";
Program "FACT"
F x N -> F;
N - 1 -> N;
If N > 1;
Then Prog "FACT";
Else print: F;
IfEnd;