用 Wolfram 语言中的几个过程定义你自己的函数

Question

我用一个过程创建了一个函数......

    Func1[n_] := Table[a[i], {i, n}]

返回

     Func1[5]
     {a[1], a[2], a[3], a[4], a[5]}

我还创建了一个包含几个参数或几个参数、几个变量的函数！

    Func1[x_, y_, z_] := (x + y)*z - 1

返回

    Func1[5, 2, 3]
    20

但是，如果我想创建一个带有多个过程的函数来返回我想要的任何内容呢？
我已经知道，当一个过程完成时，我必须在此过程的末尾键入";"！
就像在循环中一样，我们做...

   For[k = 2, k < 3, k++,
       S := Table[a[i], {i, n}];
       B := Dimensions[S][[1]]];
      ]

所以我需要创建一个带有几个过程的函数！
怎么办？
请帮帮我！

Answer 1

这里有

几个例子。 请记住使用小写首字母，以避免与全部以大写字母开头的内置函数发生冲突。

s[n_] := Table[a[i], {i, n}]
b[s_] := Dimensions[s][[1]]
For[k = 2, k < 3, k++,
 x = s[k];
 Print[b[x]]]

阿拉伯数字

For[k = 2, k < 3, k++,
 Print[b[s[k]]]]

阿拉伯数字

Answer 2

使用括号进行分组。
例如

set$s$b[n_Integer] := ($s = Table[a[i], {i, n}];
                       $b = Dimensions[$s][[1]];)

现在，在执行之后，例如，

set$s$b[5]

一个会得到

$s

{a[1], a[2], a[3], a[4], a[5]}

$b

5

但是，在需要执行多个过程的情况下，使用模块化可能是更好的设计选择。