Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Прочее";
Текущий архив: 2007.01.28;
Скачать: [xml.tar.bz2];

Вниз

Программа, которая выводит собственный листинг   Найти похожие ветки 

 
vidiv ©   (2006-12-21 17:45) [0]

Как там было? Чтото я не могу себе пока представить, как это делалось


 
Ega23 ©   (2006-12-21 17:47) [1]

char s[]="char s[]=%c%s%c;main(){printf(s,34,s,34);}";main(){printf(s,34,s,34);}


 
Parus ©   (2006-12-21 18:09) [2]


>  Программа, которая выводит собственный листинг
>
> vidiv ©   (21.12.06 17:45)  
> Как там было? Чтото я не могу себе пока представить, как
> это делалось

это не может быть чтобы узнать исходник проги так как при переводе к 1001010 это "оптимизируется".

ЗЫ если только код написать ещё в TEXT


 
ocean ©   (2006-12-21 18:29) [3]

type typeme.bat


 
Ega23 ©   (2006-12-21 18:30) [4]


> это не может быть чтобы узнать исходник проги так как при
> переводе к 1001010 это "оптимизируется".


Есть многое в природе, друг Горацио,
Что и не снилось нашим мудрецам.


 
Loginov Dmitry ©   (2006-12-21 20:18) [5]

> Как там было? Чтото я не могу себе пока представить, как
> это делалось


Поставлять вместе в прогой ее исходники.


 
TUser ©   (2006-12-21 20:30) [6]

А как называются такие программы? Трояновский как-то приводил умное слово, но я забыл :(


 
Anatoly Podgoretsky ©   (2006-12-21 20:31) [7]

> TUser  (21.12.2006 20:30:06)  [6]

> Трояновский как-то приводил умное слово

Так и называл Троян


 
TUser ©   (2006-12-21 20:32) [8]

Не, та что-то умнее. Заусный совсем термин какой-то. Чтобы студентов пугать.


 
Anatoly Podgoretsky ©   (2006-12-21 20:35) [9]

> TUser  (21.12.2006 20:32:08)  [8]

Умнее это уже не по фамилии, это уже вирус и именно к этому классу и относятся эти программы.


 
antonn ©   (2006-12-21 21:27) [10]

vidiv ©   (21.12.06 17:45)
http://delphimaster.net/view/15-1166616949/
одинадцатый пост


 
Думкин ©   (2006-12-22 05:54) [11]

> Ega23 ©   (21.12.06 17:47) [1]

Это длинная. 80 символов. Мой одноклассник с напарником написали самую короткую. 68 кажется символов. Вечером код положу.


 
MBo ©   (2006-12-22 07:09) [12]

>TUser
Quine (Квайн)


 
noname_   (2006-12-22 09:00) [13]

самая короткая программа на питоне, печатающая свой листинг, это пустая строка

еще для этой цели хорошо подходит язык HQ9+


 
Vga ©   (2006-12-22 10:50) [14]

> [11] Думкин ©   (22.12.06 05:54)

64 символа (не моя ессно):
main(a){printf(a,34,a="main(a){printf(a,34,a=%c%s%c,34);}",34);}


 
Vga ©   (2006-12-22 10:52) [15]

> [12] MBo ©   (22.12.06 07:09)

Из Lingvo:
---
quine куин ( любая программа, которая генерирует на выходе копию собственного исходного текста; название таким программам придумано в честь специалиста в области логики Уилларда Куина )


 
Gero ©   (2006-12-22 10:57) [16]

> [13] noname_   (22.12.06 09:00)
> еще для этой цели хорошо подходит язык HQ9+

Да, это уж точно :)


 
Думкин ©   (2006-12-22 11:05) [17]

> Vga ©   (22.12.06 10:50) [14]

Ага. Именно 64 - эта как раз и есть.


 
Игорь Шевченко ©   (2006-12-22 11:16) [18]


> Не, та что-то умнее. Заусный совсем термин какой-то. Чтобы
> студентов пугать.


Интроспективная программа


 
Думкин ©   (2006-12-23 06:20) [19]

> Vga ©   (22.12.06 10:50) [14]

Авторы Влад Таиров и Рашит Фахреев. ФФ НГУ.


 
IAmDanil ©   (2006-12-23 12:12) [20]

дада занимался я этим... год назад вот тут прочитал... http://forum.olymp.vinnica.ua/viewtopic.php?id=9
и вроде на паскале моя программа была самая короткая...

var v:string;begin v:="""ar v:string;begin v:=;insert(v[1]+v[1]+v+v[1],v,23);v[1]:=v[5];write(v)end.";insert(v[1]+v[1]+v+v[1],v,23);v[1]:=v[5];write(v)end.


 
IAmDanil ©   (2006-12-23 12:14) [21]

не используя код "#34" на паскале сможете короче написать?


 
VirEx ©   (2006-12-23 12:30) [22]


>  [20] IAmDanil ©   (23.12.06 12:12)

а куда "program" делось?


 
Gero ©   (2006-12-23 12:31) [23]

> [22] VirEx ©   (23.12.06 12:30)

Не обязательно.


 
VirEx ©   (2006-12-23 12:36) [24]


>  [23] Gero ©   (23.12.06 12:31)
> Не обязательно.



> Программа, которая выводит собственный листинг

полный листинг программы на паскале начинается с "program" поэтому обязательно.


 
Gero ©   (2006-12-23 12:39) [25]

> [24] VirEx ©   (23.12.06 12:36)

Что значит «начинается»? Виденные мною компиляторы паскаля этого не требовали.


 
Данил.Ялта   (2006-12-23 14:34) [26]

Не... По условию она должна вывести свой исходный код... А код может быть и без program так как компилятор этого не требует


 
vidiv2   (2006-12-23 19:21) [27]

Жаль компилятор не соглашается компилировать пустую программу=)) а то короче всех бы была... однозначно=))


 
Vga ©   (2006-12-23 19:24) [28]

> [24] VirEx ©   (23.12.06 12:36)

Компилится. Значит - правильно.


 
Parus ©   (2006-12-23 21:13) [29]

кОГДА МЫ СТАВИМ В ПРОГУ код который выводит код, то мы изменяем код, и соответстевенно изменяем выводящийся код,а тогда измяняем код проги и код вывода. и т.д.
РЕКУРСИЯ ПОЛУЧАЕТСЯ:
A,B:STRING;
BEGIN
REPEAT
A:=A+B;
UNTIL A=A+B;
END.
ЗЫ  ЭТО НЕ ПРОГА А ПРИМЕР РЕКУРСИИ В ПОПЫТКЕ ВЫВЕСТИ....


 
Parus ©   (2006-12-23 21:14) [30]

извините за непонятный пост, но я понятней говорю только с компилятором.


 
kaZaNoVa ©   (2007-01-03 21:48) [31]

Parus ©   (23.12.06 21:14) [30]
извините за непонятный пост, но я понятней говорю только с компилятором.


в орешник!


 
гыгы   (2007-01-04 00:51) [32]

>Parus ©   (23.12.06 21:13) [29]
Товарищ убедительно доказал, что 4 решения, приведенные выше, не могут существовать.


 
TCrash   (2007-01-04 12:22) [33]

короче 8 символов не получится :)
1.bat (filename)
=================
type 1.bat


 
Думкин ©   (2007-01-04 13:07) [34]

> TCrash   (04.01.07 12:22) [33]

Если эхо подавить?


 
Sha ©   (2007-01-04 16:36) [35]

> IAmDanil ©   (23.12.06 12:14) [21]
> не используя код "#34" на паскале сможете короче написать?



var s:string;begin s:=
"var s:string;begin s:="";insert(s[23],s,24);insert(s,s,24);write(s)end.";
                         insert(s[23],s,24);insert(s,s,24);write(s)end.


P.S. пробелы не считай - они для удобства понимания только :)


 
GrayFace ©   (2007-01-09 14:22) [36]

TCrash   (04.01.07 12:22) [33]
type %0



Страницы: 1 вся ветка

Форум: "Прочее";
Текущий архив: 2007.01.28;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.52 MB
Время: 0.038 c
2-1168315962
koha
2007-01-09 07:12
2007.01.28
А картиночку на MessageBox прорисовать можно?


2-1168153668
vegarulez
2007-01-07 10:07
2007.01.28
Подскажите что-нибудь взамен функции Substr и Replacestr...


15-1167917805
Layner
2007-01-04 16:36
2007.01.28
Вопрос по компилятору


15-1168009247
Chort
2007-01-05 18:00
2007.01.28
Флешкa


15-1168402510
Slider007
2007-01-10 07:15
2007.01.28
С днем рождения ! 10 января





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский