周期表を覚えよう！ 📖

1から118までの自然数を入力するとその番号の元素が出力されます。

プログラム: (→大)
「1から118までの自然数を1つ選んで入力してください」と表示　改行作成 ボタン=「数値入力」のボタン作成。 　ボタンをクリックした時には 「原子番号」と尋ねてaに代入　 　 aを表示 　 もしaが1なら「1族1周期水素　H」と表示 　 もしaが2なら「18族1周期ヘリウム　He」と表示 　 もしaが3なら「1族2周期リチウム　Li」と表示 　 もしaが4なら「2族2周期ベリリウム　Be」と表示 　 もしaが5なら「13族2周期ホウ素　B」と表示 　 もしaが6なら「14族2周期炭素　C」と表示 　 もしaが7なら「15族2周期窒素　N」と表示 　 もしaが8なら「16族2周期酸素　O」と表示 　 もしaが9なら「17族2周期フッ素　F」と表示 　 もしaが10なら「18族2周期ネオン　Ne」と表示 　 もしaが11なら「1族3周期ナトリウム　Na」と表示 　 もしaが12なら「2族3周期マグネシウム　Mg」と表示 　 もしaが13なら「13族3周期アルミニウム　Al」と表示 　 もしaが14なら「14族3周期ケイ素　 Si」と表示 　 もしaが15なら「15族3周期リン　P」と表示 　 もしaが16なら「16族3周期硫黄　S」と表示 　 もしaが17なら「17族3周期塩素　Cl」と表示 　 もしaが18なら「18族3周期アルゴン　Ar」と表示 　 もしaが19なら「1族4周期カリウム　K」と表示 　 もしaが20なら「2族4周期カルシウム　Ca」と表示 　 もしaが21なら「3族4周期スカンジウム　Sc」と表示 　 もしaが22なら「4族4周期チタン　Ti」と表示 　 もしaが23なら「5族4周期バナジウム　V」と表示 　 もしaが24なら「6族4周期クロム　Cr」と表示 　 もしaが25なら「7族4周期マンガン　Mn」と表示 　 もしaが26なら「8族4周期　鉄　Fe」と表示 　 もしaが27なら「9族4周期コバルト　Co」と表示 　 もしaが28なら「10族4周期ニッケル　Ni」と表示 　 もしaが29なら「11族4周期　銅　Cu」と表示 　 もしaが30なら「12族4周期　亜鉛　Zn」と表示 　 もしaが31なら「13族4周期ガリウム　Ga」と表示 　 もしaが32なら「14族4周期ゲルマニウム　Ge」と表示 　 もしaが33なら「15族4周期ヒ素　As」と表示 　 もしaが34なら「16族4周期セレン　Se」と表示 　 もしaが35なら「17族4周期　臭素　Br」と表示 　　　もしaが36なら「18族4周期クリプトン　Kr」と表示 　　　もしaが37なら「1族5周期ルビジウム　Rb」と表示 　　　もしaが38なら「2族5周期ストロンチウム　Sr」と表示 　　　もしaが39なら「3族5周期イットリウム　Y」と表示 　　　もしaが40なら「4族5周期ジルコニウム　Zr」と表示 　　　もしaが41なら「5族5周期ニオブ　Nb」と表示 　　　もしaが42なら「6族5周期モリブデン Mo」と表示 　　　もしaが43なら「7族5周期テクネチウム　Tc」と表示 　　　もしaが44なら「8族5周期ルテニウム　Ru」と表示 　　　もしaが45なら「9族5周期ロジウム　Rh」と表示 　　　もしaが46なら「10族5周期パラジウム　Pd」と表示 　　　もしaが47なら「11族5周期　銀　Ag」と表示 　　　もしaが48なら「12族5周期カドミウム　Cd」と表示 　　　もしaが49なら「13族5周期インジウム　In」と表示 　　　もしaが50なら「14族5周期スズ　Sn」と表示 　　　もしaが51なら「15族5周期アンチモン　Sb」と表示 　　　もしaが52なら「16族5周期テルル　Te」と表示 　　　もしaが53なら「17族5周期ヨウ素　I」と表示 　　　もしaが54なら「18族5周期キセノン　Xe」と表示 　　　もしaが55なら「1族6周期セシウム　Cs」と表示 　　　もしaが56なら「2族6周期バリウム　Ba」と表示 　　　もしaが57なら「ランタノイド族6周期ランタン　La」と表示 　　　もしaが58なら「ランタノイド族6周期セリウム　Ce」と表示 　　　もしaが59なら「ランタノイド族6周期プラセオジム　Pr」と表示 　　　もしaが60なら「ランタノイド族6周期ネオジム　Nd」と表示 　　　もしaが61なら「ランタノイド族6周期プロメチウム　Pm」と表示 　　　もしaが62なら「ランタノイド族6周期サマリウム　Sm」と表示 　　　もしaが63なら「ランタノイド族6周期ユウロピウム　Eu」と表示 　　　もしaが64なら「ランタノイド族6周期ガドリニウム　Gd」と表示 　　　もしaが65なら「ランタノイド族6周期テルビウム Tb」と表示 　　　もしaが66なら「ランタノイド族6周期ジスプロシウム Dy」と表示 　　　もしaが67なら「ランタノイド族6周期ホルミウム　Ho」と表示 　　　もしaが68なら「ランタノイド族6周期エルビウム　Er」と表示 　　　もしaが69なら「ランタノイド族6周期ツリウム　Tm」と表示 　　　もしaが70なら「ランタノイド族6周期イッテルビウム　Yb」と表示 　　　もしaが71なら「ランタノイド族6周期ルテチウム　Lu」と表示 　　　もしaが72なら「4族6周期ハフニウム　Hf」と表示 　　　もしaが73なら「5族6周期タンタル　Ta」と表示 　　　もしaが74なら「6族6周期タングステン　W」と表示 　　　もしaが75なら「7族6周期レニウム　Re」と表示 　　　もしaが76なら「8族6周期オスミウム　Os」と表示 　　　もしaが77なら「9族6周期イリジウム　Ir」と表示 　　　もしaが78なら「10族6周期　白金　Pt」と表示 　　　もしaが79なら「11族6周期　金　Au」と表示 　　　もしaが80なら「12族6周期　水銀　Hg」と表示 　　　もしaが81なら「13族6周期タリウム　Tl」と表示 　　　もしaが82なら「14族6周期　鉛　Pb」と表示 　　　もしaが83なら「15族6周期ビスマス　Bi」と表示 　　　もしaが84なら「16族6周期ポロニウム　Po」と表示 　　　もしaが85なら「17族6周期アスタチン　At」と表示 　　　もしaが86なら「18族6周期ラドン　Rn」と表示 　　　もしaが87なら「1族7周期フランシウム　Fr」と表示 　　　もしaが88なら「2族7周期ラジウム　Ra」と表示 　　　もしaが89なら「アクチノイド族7周期アクニチウム　Ac」と表示 　　　もしaが90なら「アクチノイド族7周期トリウム Th」と表示 　　　もしaが91なら「アクチノイド族7周期プロトアクチニウム　Pa」と表示 　　　もしaが92なら「アクチノイド族7周期ウラン　U」と表示 　　　もしaが93なら「アクチノイド族7周期ネプツニウム　Np」と表示 　　　もしaが94なら「アクチノイド族7周期プルトニウム Pu」と表示 　　　もしaが95なら「アクチノイド族7周期アメリシウム　Am」と表示 　　　もしaが96なら「アクチノイド族7周期キュリウム　Cm」と表示 　　　もしaが97なら「アクチノイド族7周期バークリウム　Bk」と表示 　　　もしaが98なら「アクチノイド族7周期カリホルニウム　Cf」と表示 　　　もしaが99なら「アクチノイド族7周期アインスタイニウム　Es」と表示 　　　もしaが100なら「アクチノイド族7周期フェルミウム　Fm」と表示 　　　もしaが101なら「アクチノイド族7周期メンデレビウム　Md」と表示 　　　もしaが102なら「アクチノイド族7周期ノーベリウム　No」と表示 　　　もしaが103なら「アクチノイド族7周期ローレンシウム　Lr」と表示 　　　もしaが104なら「4族7周期ラザホージウム　Rf」と表示 　　　もしaが105なら「5族7周期ドブニウム　Db」と表示 　　　もしaが106なら「6族7周期シーボーギウム　Sg」と表示 　　　もしaが107なら「7族7周期ボーリウム　Bh」と表示 　　　もしaが108なら「8族7周期ハッシウム　Hs」と表示 　　　もしaが109なら「9族7周期マイトネリウム　Mt」と表示 　　　もしaが110なら「10族7周期ダームスタチウム　Ds」と表示 　　　もしaが111なら「11族7周期レントゲニウム　Rg」と表示 　　　もしaが112なら「12族7周期コペルニシウム　Cn」と表示 　　　もしaが113なら「13族7周期ニホニウム　Nh」と表示 　　　もしaが114なら「14族7周期フレロビウム　Fl」と表示 　　　もしaが115なら「15族7周期モスコビウム　Mc」と表示 　　　もしaが116なら「16族7周期リバモリウム　Lv」と表示 　　　もしaが117なら「17族7周期テネシン　Ts」と表示 　　　もしaが118なら「18族7周期オガネソン　Og」と表示 　　　もしa>118なら「未発見」と表示 　　　終わり ここまで。