Data update
This commit is contained in:
parent
72eb4943cb
commit
4d5544505c
2347 changed files with 62432 additions and 16731 deletions
|
|
@ -1,16 +1,12 @@
|
|||
proc mpos n . .
|
||||
proc mpos n .
|
||||
a[] = [ 1 2 5 13 57 72 89 104 ]
|
||||
b[] = [ -1 15 25 35 72 21 58 7 ]
|
||||
i = len a[]
|
||||
while a[i] > n
|
||||
i -= 1
|
||||
.
|
||||
while a[i] > n : i -= 1
|
||||
m = n + b[i]
|
||||
r = m div 18 + 1
|
||||
c = m mod 18 + 1
|
||||
print "Atomic number " & n & "-> " & r & ", " & c
|
||||
.
|
||||
elem[] = [ 1 2 29 42 57 58 59 71 72 89 90 103 113 ]
|
||||
for e in elem[]
|
||||
mpos e
|
||||
.
|
||||
for e in elem[] : mpos e
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue