aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2026-02-01 16:33:20 -08:00
parent 5150844a7d
commit 4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
Download patch file Download diff file Expand all files Collapse all files

20
Task/Summarize-primes/EasyLang/summarize-primes.easy
View file

@ -1,22 +1,18 @@
func prime n .
if n mod 2 = 0 and n > 2
return 0
.
i = 3
fastfunc isprim n .
if n < 2 : return 0
i = 2
while i <= sqrt n
if n mod i = 0
return 0
.
i += 2
if n mod i = 0 : return 0
i += 1
.
return 1
.
for i = 2 to 999
if prime i = 1
if isprim i = 1
ind += 1
sum += i
if prime sum = 1
print ind & ": " & sum
if isprim sum = 1
print ind & " " & i & " " & sum
.
.
.