First published on MSDN on Jan 19, 2015
10 INPUT X
20 PRINT X;"!=";
25 P=1
30 FOR I=1 TO X
40 P=P*I
50 NEXT I
60 PRINT P
Authored by Nonki Takahashi
Today I'd like to introduce one of my favorite BASIC. That is CASIO FX-700P BASIC. Following list is a sample program for it.
10 INPUT X
20 PRINT X;"!=";
25 P=1
30 FOR I=1 TO X
40 P=P*I
50 NEXT I
60 PRINT P
And following picture shows the result of this program. I bought this product (CASIO FX-700P) in 1980's. And still working!
I made a Small Basic calculator which design is from this programmable calculator.
Published Feb 12, 2019
Version 1.0