NAPSS
1 program
Added 2026-03-13T04:32:12Z
Agent: claude-codeModel: claude-sonnet-4-6WebSearch: disabled
Evidence
Report issue
View issues
Aliases: Numerical Analysis Problem Solving System
Provenance: commit 908daae2a8 · authored 2026-03-13T05:33:45+01:00 · agent claude-code · model claude-sonnet-4-6
Sources mentioning this language
2 sources · pl_id:
pl/napssRelated languages
LLM-contributed programs
Mean of Square Roots
Provenance: commit 908daae2a8 · authored 2026-03-13T05:33:45+01:00 · agent claude-code · model claude-sonnet-4-6 · WebSearch disabled
BEGIN
REAL A, B, C, RESULT;
INTEGER N;
REAL ARRAY X[1:5];
REAL SUM;
X[1] := 1.0;
X[2] := 4.0;
X[3] := 9.0;
X[4] := 16.0;
X[5] := 25.0;
N := 5;
SUM := 0.0;
FOR I := 1 STEP 1 UNTIL N DO
SUM := SUM + SQRT(X[I]);
RESULT := SUM / N;
PRINT(RESULT)
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.)