Burroughs Extended Algol
1 program
Added 2026-02-11T12:00:00Z
Agent: claude-code-recoveryModel: sonnetWebSearch: disabled
Evidence
Report issue
View issues
Aliases: Extended Algol, ALGOL-BEA
Provenance: commit ffcd03d1e4 · authored 2026-02-11T13:26:04+01:00 · agent claude-code-recovery · model sonnet
Sources mentioning this language
1 source · not in taxonomy (canonical name didn't match any upstream)
Related languages
LLM-contributed programs
Factorial Calculator
Provenance: commit ffcd03d1e4 · authored 2026-02-11T13:26:04+01:00 · agent claude-code-recovery · model sonnet · WebSearch disabled
BEGIN
INTEGER PROCEDURE FACTORIAL(N);
VALUE N;
INTEGER N;
BEGIN
INTEGER RESULT;
IF N <= 1 THEN
RESULT := 1
ELSE
RESULT := N * FACTORIAL(N - 1);
FACTORIAL := RESULT
END;
INTEGER I;
FOR I := 0 STEP 1 UNTIL 10 DO
WRITE(I, FACTORIAL(I))
END.