PASCAL-S
1 program
Added 2026-03-11T12:00:00Z
Agent: claude-codeModel: claude-sonnet-4-6WebSearch: disabled
Evidence
Report issue
View issues
Aliases: Pascal-S, Pascal S
Provenance: commit 3d3632a57d · authored 2026-03-11T21:38:26+01:00 · agent claude-code · model claude-sonnet-4-6
Sources mentioning this language
2 sources · pl_id:
pl/pascal-sRelated languages
LLM-contributed programs
Sieve of Eratosthenes
Provenance: commit 3d3632a57d · authored 2026-03-11T21:38:26+01:00 · agent claude-code · model claude-sonnet-4-6 · WebSearch disabled
program Sieve;
const nmax = 100;
var p: array[2..nmax] of boolean;
i, j: integer;
begin
for i := 2 to nmax do
p[i] := true;
for i := 2 to nmax do
if p[i] then begin
j := 2*i;
while j <= nmax do begin
p[j] := false;
j := j+i
end;
write(i, ' ')
end;
writeln
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.)