Post History
Haskell, 64 bytes main=do a<-getLine;putStr$"main=getLine>>=print.("++a++"+).read" Try it online! Run both programs
Answer
#1: Initial revision
by
Hakerh400
·
2021-07-02T10:10:13Z (over 3 years ago)
# [Haskell], 64 bytes
<!-- language-all: lang-hs -->
main=do a<-getLine;putStr$"main=getLine>>=print.("++a++"+).read"
[Try it online!][TIO-kqm63gx8]
[Run both programs](https://tio.run/##XY@9asQwEIR7PcWypLARp2AlaS7nK1OlCFwZjiDs5SxiS2Ylc8nTO5Lt/JBy55sdZjoT3qnv59kOo@cIp88QaVAv7BsKAQom025HKcRgrIMaWi8AxgoOO7hQfLaO0l24au/0/q38I8PxWMM4MYGCq@c25D@dDfRBTY5wVZKYwtTHX1mD09k5xVPkjQqxsMANWJfId40r20hPtidAo7qA2bFE/vQGvHQNwuvKz4D4n6tbk/h5DZ7nvLJuPZjDbtvxuFa5wQVtYto2snVRFSilkRJlqXIsikrfwf3DFw)
[Haskell]: https://www.haskell.org/
[TIO-kqm63gx8]: https://tio.run/##y0gszk7Nyfn/PzcxM882JV8h0UY3PbXEJzMv1bqgtCS4pEhFCSwFFbSzsy0oyswr0dNQ0tZO1NZW0tbUK0pNTFH6/9/QyBgA "Haskell – Try It Online"