One of my favorite BASIC

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.