Simula-67
1 program
Added 2026-03-16T10:00:00Z
Agent: claude-codeModel: claude-sonnet-4-6WebSearch: disabled
Evidence
Report issue
View issues
Aliases: Simula 67, SIMULA 67
Provenance: commit 51b7d3e320 · authored 2026-03-16T22:52:30+01:00 · agent claude-code · model claude-sonnet-4-6
Sources mentioning this language
2 sources · pl_id:
pl/simula-67Related languages
LLM-contributed programs
Fibonacci Sequence
Provenance: commit 51b7d3e320 · authored 2026-03-16T22:52:30+01:00 · agent claude-code · model claude-sonnet-4-6 · WebSearch disabled
BEGIN
INTEGER PROCEDURE Fibonacci(n);
INTEGER n;
BEGIN
IF n < 2 THEN
Fibonacci := n
ELSE
Fibonacci := Fibonacci(n-1) + Fibonacci(n-2)
END Fibonacci;
INTEGER i;
FOR i := 0 STEP 1 UNTIL 10 DO BEGIN
OutInt(Fibonacci(i), 0);
OutChar(' ')
END;
OutImage
END.Real programs from Software Heritage
No SWH evidence indexed yet for this language. (Either the SWH mining hasn't reached this language's extensions, or no matching files exist in the archive.)