Data update
This commit is contained in:
parent
35bcdeebf8
commit
74c69a0df6
2427 changed files with 31826 additions and 3468 deletions
11
Task/Van-Eck-sequence/SETL/van-eck-sequence.setl
Normal file
11
Task/Van-Eck-sequence/SETL/van-eck-sequence.setl
Normal file
|
|
@ -0,0 +1,11 @@
|
|||
program vaneck;
|
||||
eck := [0];
|
||||
|
||||
loop for i in [1..999] do
|
||||
prev := eck(..#eck-1);
|
||||
eck(i+1) := i - (max/[j : e=prev(j) | e=eck(i)] ? i);
|
||||
end loop;
|
||||
|
||||
print(eck(1..10));
|
||||
print(eck(991..1000));
|
||||
end program;
|
||||
Loading…
Add table
Add a link
Reference in a new issue