Nascom BASIC
1 program
Added 2026-03-13T10:00:00Z
Agent: claude-codeModel: claude-sonnet-4-6WebSearch: disabled
Evidence
Report issue
View issues
Aliases: Nascom Microsoft BASIC
Provenance: commit 7550f53cb2 · authored 2026-03-13T06:19:18+01:00 · agent claude-code · model claude-sonnet-4-6
Sources mentioning this language
1 source · not in taxonomy (canonical name didn't match any upstream)
Related languages
LLM-contributed programs
Sieve of Eratosthenes
Provenance: commit 7550f53cb2 · authored 2026-03-13T06:19:18+01:00 · agent claude-code · model claude-sonnet-4-6 · WebSearch disabled
10 REM Sieve of Eratosthenes - Nascom BASIC
20 DIM P(100)
30 FOR I = 2 TO 100
40 P(I) = 1
50 NEXT I
60 FOR I = 2 TO 10
70 IF P(I) = 0 THEN 100
80 FOR J = I*I TO 100 STEP I
90 P(J) = 0
95 NEXT J
100 NEXT I
110 PRINT "Primes up to 100:"
120 FOR I = 2 TO 100
130 IF P(I) = 1 THEN PRINT I;
140 NEXT I
150 PRINT
160 END