Juliaでの方法 方法1 sum(1:100) ^ 2 - sum(map(x -> x * x, (1:100))) 方法2 Int64((100 * (100+1) / 2) ^ 2) - Int64((100 * (100+1) * (2*100+1) / 6))

Rubyでの方法 (2..20).reduce(:lcm) Haskellでの方法 foldl lcm 1 [2..20] Juliaでの方法 foldl(lcm,2:20)

将来得られるものより今得られるもののほうが価値がある。 What you get now is more valuable than what you get in the future. あなたが持っていないものを欲しがるのではなく、あなたが持っているものを大切にしろ。 Cherish what you have, not want wh…

Rubyによる方法 def palindromic_number(n, a=0) if n == 0 a else q, r = n.divmod 10 palindromic_number(q, a * 10 + r) end end def is_palindromic_number(n) n == palindromic_number(n) end largest_palindromic_number = 0 999.downto(100) { |a| 99…

Juliaを使いました ある数nが合成数ならば、nの最大の素因数 = (n / (nの最小の素因数)) の最大の素因数 であることを使いました。 例 13195の最大の素因数＝(13195/5)の最大の素因数 function find_divisor(n, d) if d * d > n n elseif n % d == 0 d else …

Haskellを使った方法 フィボナッチ数列の無限リストを作成する関数 fibgen :: Integer -> Integer -> [Integer]fibgen a b = a : fibgen b (a + b) 上記の関数を使用して計算する sum (filter even (takeWhile (<4000000) (fibgen 1 1))) 参考URLお気楽 Hask…

Juliaでの方法 julia> sum( [n for n = 1:999 if n%3==0 || n%5==0] ) Forthでの方法 スタックの1番目のデータが3の倍数であるかを判断するワード: is-multiple3 3 mod 0= ; スタックの1番目のデータが5の倍数であるかを判断するワード: is-multiple5 5 mod …

一人の若い人がいた。There was one young man.彼の父と母が死んだ。His father and mother died.彼は新しい生活を始めることを決めた。He decided to start a new life.彼の家には紐以外に何もなかった。There was nothing but a string in his house.彼は…

二人の間に何度も繰り返された過去の光景が彼の前に現れた。A scene of the past repeated between them appeared before him. あのとき彼女は彼を信じていた。At that time she believed in him. だから、彼女は彼にすべての知識を求めた。So she asked him…

私はそれを開けようとした。I tried to open it.私はそれを開けるために様々なことを試した。I tried various things to open it.私はそれを開けるために様々な方法を試した。I have tried various methods to open it.私はそれを開けるために様々なことをし…

彼女は残業をした。She worked overtime.彼女は遅くまで働いた。She worked late.彼女は、報告書を書くために、遅くまで働いた。She worked late to write the report.彼女は、報告書を作成するために、遅くまで働いた。She worked late to produce the repo…