Программа, выводящая сама себя

← →
Vendict © (2006-03-27 23:06) [0]

Возможно ли реализовать это на паскале ?
Без использования файлов конечно.

← →
ArtemESC © (2006-03-27 23:36) [1]

>> Программа, выводящая сама себя
Куда?

← →
McSimm © (2006-03-27 23:41) [2]

возможно.
на этом сайте такой код появлялся, я не сохранил.
Работа со строками

← →
unknown © (2006-03-28 00:01) [3]

На любой вкус :)
http://www.nyx.net/~gthompso/quine.htm

← →
Gero © (2006-03-28 00:44) [4]

Используй язык HQ9++, там для этого даже специальная команда отведена.

Любой скрипт. Онже сам седе и листинг

program Project1;

{$APPTYPE CONSOLE}

CONST S="program Project1; {$APPTYPE CONSOLE} CONST S=;BEGIN WRITE(COPY(S,1,45)+#39+S+#39+COPY(S,46,63));ReadLn; END.";

begin
WRITE(COPY(S,1,45)+#39+S+#39+COPY(S,46,63));
ReadLn;
end.

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