元素的族及周期

元素的族及周期

程式可以根據元素的原子序(atomic number)計算出元素的族及周期(Group and Period)。

程式是參考網友 Mike 提供的程式作為基礎，進行修改及強化功能，使程式亦可以計算過渡金屬(Transition metals)、鑭系元素(Lanthanoids)及錒系元素(Actinoids)的情況。

程式編寫日期: 2008年6月14日

注意: 藍色程式碼^o是按 ^o,,,

程式 (159 bytes)

Mem clear: ?→A: 2→X: 1→B: (A=1) + 18(A=2M+ => Goto 0:

Lbl 1: 1 + B→B: B÷2 - . 5: Fix 0: Rnd: Norm 1: 2(Ans + 1)²→Y:

X + Y→D: A>D => D→X => Goto 1: A - X→D: D - Y + 18M+:

Y=32 => D>3 => 18>D => MM-: Y=32 => D=3 => D→M:

2≧D => D→M: 18≧A => D + 10(D>2→M: Lbl 0: B^o + M÷60^o

例題: 求原子序52的碲元素 Te 族及周期數。

按 Prog 1 再按 52 EXE (顯示5^o16^o0，即為周期為5及元素為16族 )

註: 族(Group)數值由1至18，若果數值出現0，表示族數不適用(n/a)。

參考資料: