Revision as of 20:40, 23 May 2021 (view source) Jjuanhdez (talk \| contribs) (Narcissist en FreeBASIC) ← Older edit		Revision as of 22:03, 2 August 2021 (view source) Shuisman (talk \| contribs) m (→‎{{header\|Mathematica}}) Newer edit →
Line 345: </lang> =={{header\|Mathematica}}/{{header\|Wolfram Language}}== {{in}} <lang Mathematica>prog = "prog = ``;\nPrint[InputString[] == \n ToString[StringForm[prog, ToString[prog, InputForm]]]];"; Print[InputString[] == ToString[StringForm[prog, ToString[prog, InputForm]]]];</lang> ~~ToString[StringForm[prog, ToString[prog, InputForm]]]];</lang>~~ {{out}} <pre>True</pre>

Narcissist (view source)