Страница 1 из 1

Как в Turbo Pascal 7 вывисти код программы?

Добавлено: 09 окт 2006, 22:01
sidd
В школе задали такую задачу: написать программу которая выводит собственный код. И йя низнаю как это зделать)). Помогите пжл.

Добавлено: 09 окт 2006, 23:01
Oscar
http://www.nyx.net/~gthompso/self_pasc.txt

Дополнительную информацию смотреть в Гугле по "Квин программы".

(Этот класс программ, названный в честь логика Уилларда Куина (Willard Quine),
которые выводят свой собственный текст – от первой и до последней буковки)

Добавлено: 09 окт 2006, 23:31
sidd
Пасиба! Токо я в том коде ничего нипонял) так што буду в гугле искать с обьяснениями))

Добавлено: 10 окт 2006, 00:49
sidd
А што означают эти символы: #39#59#98#61#39,b,#39#59#10?

Добавлено: 10 окт 2006, 09:46
Oscar
sidd, Unicode (google: Escape коды)

Код: Выделить всё

'	#39
;	#59
b	#98
=	#61
'	#39

'	#39
;	#59
LF	#10

LF — Line Feed, перевод строки
Пример, который ты рассматриваешь (первый на ссылке), можно писать и без #10, если писать код не в две строки, а в одну.

Re: Как в Turbo Pascal 7 вывисти код программы?

Добавлено: 07 дек 2006, 17:20
Хыиуду
А нельзя просто открыть файл *.pas на чтение, считать из него все и вывести на экран?