Editing Sharp PC-1403 (section)

===Programming example===
Here is a sample program that computes the factorial of an integer number from 0 to 69. It can be called by entering a number or an expression followed by pressing <code>DEF</code> <code>F</code> (in run mode).
 
<syntaxhighlight lang="QBasic">
10 "F" AREAD N                         ''allows to start the program with <expression> DEF F
20 F=1                                 ''Set start value of F to 1
30 FOR I=1 TO N                        ''counts I from 1 to N
40 F=F*I                               ''calculates F=F*I
50 NEXT I                              ''repeats loop from line 40
60 PRINT STR$ N+"!=";F                 ''print result - i.e. 5!=120.
70 END                                 ''end of program
</syntaxhighlight>