AtS Report

円周率を計算するPerlプログラムを github で公開している人がいた。 https://gist.github.com/djsas/2083243 ===ここから=== use strict; use warnings; use bigint; my($t1,$t2); my $n=2000; my $a; my $b; my $i; $t1=times; $a = $b = 10 ** $n; for($i = $n * 8 + 1; $i >= 3; $i -= 2) {   $a = int(int($i / 2) * ($a + $b * 2) / $i); } $a -= $b; print("3.$a\n"); $t2=times; print "<".($t2-$t1).">"; ===ここまで=== 円周率の公式と計算法 http://www.kurims.kyoto-u.ac.jp/~kenkyubu/kokai-koza/H16-ooura.pdf 円周率を計算してみよう http://w3e.kanazawa-it.ac.jp/e-scimath/contents/t16/textbook_t16_all.pdf

取り敢えず簡易な素数判定プログラム。 使用言語は perl。 Nが 2から√Nまで の整数で割り切れないと素数だと判定している。 次のプログラムは 3以上の整数 しか判定できない。 =====ここから===== use strict; use warnings; # input number chomp(my $num = <>); foreach my $i (2 .. int sqrt $num) {   if ($num % $i == 0) {     print "Non prime.\n";     exit;   } } print "$num is Prime number.\n"; =====ここまで===== $num は必要な数字を入力してあってもいい。 素数とは、 「2以上の整数の中で、1と自分自身以外で割り切れない数」 とよく言われる。 細かく説明すると次のようなことである。 　6は2と3から作ることが出来る為、6は合成数という。 　様々な数が合成することで作れる。 　合成することが出来ない数が素数である。 このような理由から 1は素数にならない。 1は何にかけてもかけられた数になる為。

ピタゴラスの定理 について書いたときに、数式が TeX で書けないかと思い調べた。 [参考] MathJax in Blogger (II) http://irrep.blogspot.jp/2011/07/mathjax-in-blogger-ii.html Mathjaxを使ってBloggerで数式を書く http://r9y9.github.io/blog/2013/08/03/mathjax-blogger/ 手順は、 Blogger管理画面にて、レイアウトを選択 Cross-Column でガジェットを追加 次のスクリプトを貼り付けし保存 投稿画面にて TeX の式を書く これで $c^2=a^2+b^2$ と書いたら $c^2=a^2+b^2$ と表示される。 なお、codeタグを用いれば、数式は変換されない。 ------ここから------ <script src="http://cdn.mathjax.org/mathjax/latest/MathJax.js" type="text/javascript">     MathJax.Hub.Config({         HTML: ["input/TeX","output/HTML-CSS"],         TeX: {                Macros: {                         bm: ["\\boldsymbol{#1}", 1],           ...

ふと、ピタゴラスの定理を満たす2つの整数が気になったので調べた。 他に意味はない。 ピタゴラスの定理 c 2 =a 2 + b 2 |m 2 − n 2 | 、2 mn 、 m 2 + n 2 mとnは自然数