［Ｘ６８］ひさしぶりにＸ−ＢＡＳＩＣ弄ってみた［Ｘ−ＢＡＳＩＣ］

「やあ行き倒れだよー。御崎さんと一緒に行ったレトロエクスプレス４号で熱気にちょいと当てられたせいか、ちょいとＸ−ＢＡＳＩＣを弄ってみたよ」


とは言ったが実は大したもんは書いてない
日ごろからもやもやとしていたことをＸ６８エミュとＸ−ＢＡＳＩＣで計算させてみただけ
題して「美しいと思う計算をさせると美しい答えは出るか」である


一応ではあるが、私は以前に人間の筆算の足し算、掛け算の計算の仕方を解析し、四苦八苦しつつもそれをコンピュータに計算させるサブルーチンを開発した
それを使えば最大２５５桁までの整数の計算（符号なし）を正確に計算させることが出来る
それを使えば普通では出来ない計算をさせる遊びが出来る
そこで思いついたものを計算させてみた


１．


９桁の１同士を掛け算させた時・・・つまりは１１１１１１１１１×１１１１１１１１１と言う計算をさせると面白い計算結果が出る
結果は１２３４５６７８９８７６５４３２１である
いろいろ探っていくと９桁の倍数の桁の１同士の計算をさせると個人的に美しいと感じる答えが出ることがわかったので、現状出来る最大の桁数で計算させてみた
なんと１２６桁の１同士を掛け算させてみた
こんな計算見たことない人がほとんどのはずだ


実に美しいと思いませんか？


２．


１の１乗×２の２乗×３の３乗×４の４乗×５の５乗×６の６乗×７の７乗×８の８乗×９の９乗×１０の１０乗を計算させてみた
式だけなら間違いなく美しいはずだ


残念ながら美しい数字の並びにはならなかったが、ひょっとしたらなにか秘密があるかもしれない感じもする答えが出た



「まあやったことはこんな程度じゃ。これを見ればプログラムって簡単じゃんと自信つくでしょ。行き倒れって奴が出来るなら私はもっと出来るわとでも思っていただければ」