Olivetti Programma 101 Reference Manual page 41

The following instructions solve the same problem in program mode:
Note that the manual solution to the problem and the programmed solution are quite similar,
with exceptions only for the instructions to create the loop, and the entry of variables.
Consequently, a useful technique for testing and debugging 8 new program is the step-by-step
manual operation of the written sequence.
Starting Point of Program.
Clear register for accumulation of answers.
Stop program for entry of factor a.
Transfer factor a to B /.
Stop program for entry of factor b.
Transfer factorb to B.
Transfer factor a to A register.
Add factor B to factor a in A register.
Print answer in A register.
Transfer answer to C register (GT).
Transfer factor a to A register.
Subtract factor b fronTfactor a in A register.
Print answer in A register.
Add answer and GT (C register).
Transfer new GT to C register.
Transfer factor a to A register.
Multiply factor b X a.
Print answer in A register.
Add answer and GT (C register).
Transfer new GT to C register.
Transfer factor a to A register.
Divide factor b into factor a.
Print answer in A register.
Add answer and GT (C register).
Transfer new GT to C register.
Take square root of factor a.
Print answer in A register.
Add answer and GT (C register).
Transfer new GT to C register.
Print Final GT in C register.
Jump to Start of Program.
- 41 -