我定义一个多奎因为：
一组用n种不同编程语言编写的n个程序，这样每个程序在没有输入的情况下输出其确切的源代码，而在以n作为输入的情况下输出第* n *个程序的源代码。
请勿将其与循环的程序序列相混淆，在循环的程序序列中，每个程序都输出下一个程序的源代码，直到输出第一个程序为止。在这种情况下，每个程序都不是一个关键点。这些循环集虽然对于n的高值是令人感兴趣的脑筋急转弯，但实现起来却微不足道。
在这种情况下，“复数”表示“对于大于或等于2的n值”。我认为n = 2的解决方案在这种情况下足够复杂。但是，针对所有n值的通用解决方案（阅读：策略）是目标。
我了解如何编写“简单”的quines，但是我似乎无法绕开那些令我着迷的复杂multiquin。我的一部分人希望除了程序员的聪明才智之外，没有其他解决方案-尽管我认为这不太可能。
最佳答案
顾名思义，奎纳丝，多语言奎纳丝，多奎纳丝没有什么特别的。它们几乎都可以自动写入。
举例来说，这是C ++中的沼泽标准，冗长，优雅，低效的标准。但是，它有很多缺点，很容易修改以执行我们想要的操作。
#include <iostream>
#include <string>
#include <cstdlib>
std::string show (const std::string& in) {
std::string res = "\"";
for (std::string::const_iterator it = in.begin(); it < in.end(); ++it) {
switch (*it) {
case '"':
case '\\':
res += '\\';
default:
res += *it;
}
}
res += "\"";
return res;
}
int main (int argc, char* argv[])
{
std::string arr[] = { // beginning ends here
"#include <iostream>",
"#include <string>",
"#include <cstdlib>",
"",
"std::string show (const std::string& in) {",
" std::string res = \"\\\"\";",
" for (std::string::const_iterator it = in.begin(); it < in.end(); ++it) {",
" switch (*it) {",
" case '\"':",
" case '\\\\':",
" res += '\\\\';",
" default:",
" res += *it;",
" }",
" }",
" res += \"\\\"\";",
" return res;",
"}",
"",
"int main (int argc, char* argv[])",
"{",
" std::string arr[] = { // beginning ends here",
"======",
" };",
" int n = argc == 1 ? 0 : std::atoi(argv[1]);",
" if (n == 0) {",
" int i, j;",
" for (i = 0; arr[i] != \"======\"; ++i) std::cout << arr[i] << std::endl;",
" for (j = 0; j < sizeof(arr)/sizeof(arr[0]); ++j) std::cout << show(arr[j]) << ',' << std::endl;",
" for (++i; i < sizeof(arr)/sizeof(arr[0]); ++i) std::cout << arr[i] << std::endl;",
" } else {",
" }",
"}",
};
int n = argc == 1 ? 0 : std::atoi(argv[1]);
if (n == 0) {
int i, j;
for (i = 0; arr[i] != "======"; ++i) std::cout << arr[i] << std::endl;
for (j = 0; j < sizeof(arr)/sizeof(arr[0]); ++j) std::cout << show(arr[j]) << ',' << std::endl;
for (++i; i < sizeof(arr)/sizeof(arr[0]); ++i) std::cout << arr[i] << std::endl;
} else {
}
}
如您所见，程序的核心是一个名为
show的小函数，该函数接受一个字符串并将其表示形式返回为C ++文字。总体结构如下：打印字符串数组的开始部分；打印通过show管道传输的整个数组；打印数组的结尾部分。字符串数组是程序的副本，插入到程序的中间。起始部分与末尾部分之间用特殊的"====="字符串分隔，该字符串不会从程序中复制（通过show仅打印一次）。插入任何其他操作很容易，例如使用其他语言打印另一个quine。我已经为此操作插入了一个占位符。
现在，将其翻译为任何编程语言绝对是微不足道的（例如FORTRAN）。假设我们已经完成了，它是由L1，L2，...，LN行组成的。我们将以下语句插入占位符：
std::cout << "L1" << std::endl;
std::cout << "L2" << std::endl;
...
std::cout << "LN" << std::endl;
我们相应地修改字符串数组。 Voilà，根据命令行参数的不同，我们有一个可以自行打印的Quine，也有一个FORTRAN中的Quine。
好，那么FORTRAN奎纳呢？它只能打印自身，而不能打印C ++ quine。没问题，让我们将C ++ quine复制回FORTRAN quine。
但是C ++ quine已经包含了整个FORTRAN quine，是两次吗？
没问题，因为FORTRAN奎纳已经可以自己打印了。因此，我们只需要将原始C ++行复制回FORTRAN。无需在自己内部再次（或两次）复制FORTRAN。
我们只需要稍微修改FORTRAN。当我们要求FORTRAN quine打印C ++ quine时，它应该打印两次所有C ++行以及所有FORTRAN行：一次为
Li，一次为std::cout << "Li" << std::endl;，就像C ++ quine一样。然后，我们得到C ++ quine（包括FORTRAN quine）。我们还需要将这些FORTRAN修改带回C ++（即修改
std::cout << "Li" << std::endl;行）。修改浪潮就此止步。就是这样，我们有两个程序可以自行打印或相互打印，具体取决于命令行参数。
我鼓励您实际做所有这一切。