用Free Pascal 做火柴问题

用Free Pascal 做火柴问题
有红，绿，蓝三种颜色的火柴，所有火柴长度一样。用它们可以组成一些数字， 为了让组成的火柴好看一些，我们规定：有公共点的火柴必须不同色。例如，用红火柴4根和蓝火柴3根可以组成数12，21，7等。而且有些方案虽然数字和它们的排列顺序都相同，但是有颜色之分。问：一共可以组成多少个数（可以包含多个数字，但至少包含一个数字）？同一个数用不同颜色表示算作不同的数，火柴可以有剩余。 输入 三个整数n1， n2， n3 (0 ≤ n1，n2，n3 ≤ 15)，即三种颜色的火柴的数目。 输出 仅一个数，即可以组成的数的数目。结果保证不超过10的16次方。