За исключением тривиальных программ, какой код компилируется на большинстве языков?
(Под «тривиальным» я подразумеваю исключение таких ответов, как пустая программа или текст, который будет отображаться напрямую.)
Следующий код, очевидно, компилируется на всех следующих языках программирования (и печатает что-то свое на каждом из них): C, C ++, Perl, TeX, LaTeX, PostScript, sh, bash, zsh и Prolog.
%:/*:if 0;"true" +s ||true<</;#|+q|*/include<stdio.h>/*\_/
{\if(%)}newpath/Times-Roman findfont 20 scalefont setfont(
%%)pop 72 72 moveto(Just another PostScript hacker,)show((
t)}. t:-write('Just another Prolog hacker,'),nl,halt. :-t.
:-initialization(t). end_of_file. %)pop pop showpage(-: */
int main(){return 0&printf("Just another C%s hacker,\n",1%
sizeof'2'*2+"++");}/*\fi}\csname @gobble\endcsname{\egroup
\let\LaTeX\TeX\ifx}\if00\documentclass{article}\begin{doc%
ument}\fi Just another \LaTeX\ hacker,\end{document}|if 0;
/(J.*)\$sh(.*)"/,print"$1Perl$2$/"if$_.=q # hack the lang!
/
sh=sh;test $BASH_VERSION &&sh=bash;test $POSIXLY_CORRECT&&
sh=sh;test $ZSH_VERSION && sh=zsh;awk 'BEGIN{x="%c[A%c[K"
printf(x,27,27)}';echo "Just another $sh hacker," #)pop%*/
Это 10 разных языков. Я нашел это через pts oldalai (у которого также есть великолепное рождественское стихотворение, написанное на C, C ++, Perl и TeX). Кто-нибудь может сделать лучше?