1、用“云部署”来建立一个网页,用户可以用来绘制正多边形:CloudDeploy[ FormPage[{"n", "请输入大于3的正整数:"} ->Restricted["Integer", {3, Infinity}],Graphics[RegularPolygon[#n]]&]]运行上面的代码,可以生成一个网页链接。
2、打开对应的网页,可以看到如下情形。
3、输入一个大于3的正整数,可以得到正多边形。
4、当输入50,得到了正50边形,几乎和一个圆无异。
5、创建另一个网页,绘制参数方程{Cos[n t],Sin[(n-1) t]}的图像,其中n需要手动输入。
6、输入6,得到下图。
7、输入36,得到下图。
8、改为滑块拖动。