1、用Range给出列表 {1, 2, 3, 4} :Range[4]
2、给出前100个正整数的列表：Range[100]
3、给出列表 {4, 3, 2, 1} :Reverse@Range@4
4、给出前50个正整数的倒序排列：Reverse@Range@50
5、给出列表{1,2,3,4,4,3,2,1}:x = Range@4Join[x, Reverse@x]
6、绘制散点图：正整数从1增加到100，再减到1.x = Range@100;ListPlot[Join[x, Reverse@x]]
7、给出20个不大于10的随机正整数的列表：RandomInteger[{1, 10}, 20]
8、用简单的方法求代码 Reverse[Reverse[Range[10]]] 的运行结果：Range[10]
9、用简单的方法求代码 Join[{1, 2}, Join[{3, 4}, {5}]] 的运行结果：Range[5]
10、给出 Join[Range[10], Join[Ra艘绒庳焰nge[10], Range[5]]] 的运行结果：x = Range[10];y = Range[5];Join[x, x, y]
11、Reverse[Join[Range[20], Reverse[Range[20]]]] 运行结果：Join[Range[20], Reverse[Range[20]]]
12、给出列表 {1, 2, 3, 4, 5, 4, 3, 2, 1}：Join[Range[5], Reverse@Range[4]]或者Join[Range@4, Reverse@Range@5]
13、给出列表 {3, 2, 1, 4, 3, 2, 1, 5, 4, 3, 2, 1}：Join[Flatten@Table[Reverse@Range [n], {n, {3, 4, 5}}]]
