Mathematica基础——循环和迭代

本文，学习一下用Mathematica处理循环和迭代的问题。不过，这次我要参照“苹果”制作的视频《迭代&扩展的24点程序》，所以有点“Piao Qie”的嫌疑！希望“苹果”不要责怪！

2、用Do给出前10个整数的平方：Do[Print[n^2]，{n,10}]//TraditionalForm注意：Do自己是不会返回任何结果给你的，需要结合Print才行！而且，返回的结果不是列表。再试试：Do[Print[n^10]，{n,10}]

3、用For求出0到10这10个数的5次方：For[i = 0, i < 11， i++, Print[i^5]]这个For的用法，与C语言的用法差不多。

5、用Map给出前10个数的平方：Map[#^2&，Range[10]]注意：Map可以用 /@ 代替；#^2& 是纯函数。你还可以试试——Sqrt[#]&/@ Range[10]/ /Column/ /N

迭代

1、计算2的100次方，可以直接输入——2^100，运行即可。但是，也可以麻烦点，用Nest（迭代、嵌套）来计算：(Nest[#*2&,x，100]//TraditionalForm)/.x->1

5、求大于10996的最小的一对孪生素数：鲍伊酷雪NestWhile[# + 1 &, 10996, ! PrimeQ[#1] || ! PrimeQ[#3] &锾攒揉敫amp;, 3】代码的执行过程——每当进行三次迭代，迭代值的第一个数和第三个数不都是素数的时候，进行下一次迭代，否则停止迭代，并返回孪生素数里面较少的素数（11059，说明：大于10996的最小的一对孪生素数是11059，11061）！

7、看看具体的迭代步骤：NestWhileList[(# + 1) &, 1, Fibonacci[#] <= 10996 &】