Rosetta Code

Category:OPL: Difference between revisions

Category Discussion

Category:OPL (view source)

Revision as of 21:47, 24 March 2014

298 bytes removed ,  10 years ago
m
Added link to official site
No edit summary
m (Added link to official site)
 
(2 intermediate revisions by one other user not shown)
Line 1:
{{stub}}
FIBON:
{{language
REM Fibonacci sequence is generated to the Organiser II floating point variable limit.
|site=http://opl-dev.sourceforge.net/}}
REM This method was derived from (not copied...) the original OPL manual that came with the CM and XP in the mid 1980s.
REM CLEAR/ON key quits.
REM Mikesan - http://forum.psion2.org/
LOCAL A,B,C
A=1 :B=1 :C=1
PRINT A,
DO
C=A+B
A=B
B=C
PRINT A,
UNTIL GET=1
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/205221...205224"