Как можно написать программу, которая выводит свой исходный текст?
1. Сохранить пустой файл с расширением exe .
2. Писать программу бесконечно.
юмор с просторов интернета...
 О нынешних соревнованиях, на злобу дня. |
Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
  |
| klem4 |
Сообщение
#1
|
 Perl. Just code it!  Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация:  44   |
-------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
   |
 
|
| AlaRic |
Сообщение
#2
|
|
... Группа: Пользователи Сообщений: 1 347 Пол: Мужской Репутация: 3 |
Олег сказал, что написал ее :yes:
|
|
|
|
| klem4 |
Сообщение
#3
|
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
ОЧЕНЬ хочу посмотреть решение на паскале!
Я нашел решеня на асме, а также на php и на прологе. достаточно жестоко  ))Сообщение отредактировано: klem4 - -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
|
|
|
| volvo |
Сообщение
#4
|
|
Гость |
klem4
На Паскале пишется за 10 минут... Кстати, иногда такой вопрос встречается на собеседованиях... Сообщение отредактировано: volvo - |
|
|
|
| klem4 |
Сообщение
#5
|
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Volvo , если не не затруднит скинь код на PM очень взглянуть охота, мысли конечно были, но так ни во что делное и не воплотились.
ЗЫ что за собеседования ? Когда на работу чтоль берут кодером ? )ЗЫЫ код я естественно не буду отправлять Oleg_Z ' у :D :D Сообщение отредактировано: klem4 - -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
|
|
|
| AlaRic |
Сообщение
#6
|
|
... Группа: Пользователи Сообщений: 1 347 Пол: Мужской Репутация: 3 |
volvo кинь плиз ему код после соревнования :yes:
|
|
|
|
| klem4 |
Сообщение
#7
|
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
AlaRic, ты хочешь чтобы я себе мозг сломал ? :D
Сообщение отредактировано: klem4 - -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
|
|
|
| Altair |
Сообщение
#8
|
 Ищущий истину Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: 45 |
я хочу что бы вы думали!!!
я придумал решение за 20 минут где-то..... Цитата volvo кинь плиз ему код после соревнования я тоже ему кину как сморевнование закончиться -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
| klem4 |
Сообщение
#9
|
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Ладно, подумаю тогда еще
-------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
|
|
|
| Altair |
Сообщение
#10
|
|
Ищущий истину Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: 45 |
я знал что все начнут беспокоиться
тема то какая Цитата 1. Сохранить пустой файл с расширением exe . 2. Писать программу бесконечно. НЕЕЕЕ!!! и вообще программа должна вывести себя слово в слово, буква в букву!!! -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
| klem4 |
Сообщение
#11
|
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
То есть там не будет бесконечного цикла ?
Она будет от Самого начала (uses или var и т.д... Begin) до последнего End. ? Сообщение отредактировано: klem4 - -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
|
|
|
| volvo |
Сообщение
#12
|
|
Гость |
klem4
Комментарии - после того как соревнование №2 закончится. Все, что нужно для решения задачи уже было сказано... :P |
|
|
|
| APAL |
Сообщение
#13
|
||
 Смотрю... Группа: Пользователи Сообщений: 1 055 Пол: Мужской Реальное имя: Пшеничный Алексей Анатольевич Репутация: 6 |
-------------------- |
||
|
|
|
||
| Altair |
Сообщение
#14
|
|
Ищущий истину Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: 45 |
APAL, ну 3 раз говорю, ТАМ С МАССИВАМИ, а я сказал делать БЕЗ МАССИВОВ!!!!
-------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
| Guest |
Сообщение
#15
|
|
Гость |
Цитата Как можно написать программу, которая выводит свой исходный текст? 1. Сохранить пустой файл с расширением exe . 2. Писать программу бесконечно. 1. При запуске такого "exe" система выведет сообщение (e. g. "Error in EXE file"), которое заведомо не совпадает с исходным кодом программы. 2. Невозможно по причине ограниченности ресурсов (системных, жизненных). |
|
|
|
| klem4 |
Сообщение
#16
|
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Цитата(Guest @ 27.01.05 13:35) 1. При запуске такого "exe" система выведет сообщение (e. g. "Error in EXE file"), которое заведомо не совпадает с исходным кодом программы. 2. Невозможно по причине ограниченности ресурсов (системных, жизненных). лол)) Это вообщето шутка )-------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
|
|
|
| Guest |
Сообщение
#17
|
|
Гость |
А я понял :D
|
|
|
|
| Altair |
Сообщение
#18
|
|
Ищущий истину Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Ну а ничего сложного в этом нет!
-------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
|
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 5.11.2025 19:44 |
Связь с администрацией: bu_gen в домене octagram.name