Category:BlooP: Difference between revisions

m
→‎Example Code: replace ⇐ with <= and × with *
(→‎Example Code: add a few examples.)
m (→‎Example Code: replace ⇐ with <= and × with *)
Line 24:
DEFINE PROCEDURE FACTORIAL [N]:
BLOCK 0: BEGIN
OUTPUT <= 1;
CELL(0) <= 1;
LOOP AT MOST N TIMES:
BLOCK 1: BEGIN
OUTPUT <= OUTPUT ×* CELL(0);
CELL(0) <= CELL(0) + 1;
BLOCK 1: END;
BLOCK 0: END.
Line 39:
DEFINE PROCEDURE MINUS [M,N]:
BLOCK 0: BEGIN
OUTPUT <= 0;
IF M < N, THEN:
QUIT BLOCK 0;
Line 46:
IF OUTPUT + N = M, THEN:
ABORT LOOP 1;
OUTPUT <= OUTPUT + 1;
BLOCK 1: END;
BLOCK 0: END.
Anonymous user