Главная страница


ru.algorithms

 
 - RU.ALGORITHMS ----------------------------------------------------------------
 From : Stanislav Shwartsman                 2:400/520      30 Sep 2001  07:23:30
 To : alexo
 Subject : Печать исходного кода
 -------------------------------------------------------------------------------- 
 
 
 30 Sep 01 02:48, you wrote to me:
  a> Я непонимаю а чем это не устраевает
 
  a> /* Интроспективная программа: печатает сама себя */
 
  a> #include <stdio.h>
 
  a> char *text[] = {
  a>  "#include <stdio.h>",
  a>  "char *text[] = {",
  a>  "        NULL};",
  a>  "/* Program printing the own text */",
  a>  "main(){ int i;",
  a>  "  puts(text[0]); puts(text[1]);",
  a>  "  for(i=0; text[i]; i++) putq(text[i]);",
  a>  "  for(i=2; text[i]; i++) puts(text[i]);",
  a>  "}",
  a>  "putq(s) char *s; {",
  a>  "  printf(\"\\t\\\"\");",
  a>  "  while(*s){",
  a>  "    if(*s == '\"')       printf(\"\\\\\\\"\");",
  a>  "    else if(*s == '\\\\') printf(\"\\\\\\\\\");",
  a>  "    else putchar(*s);",
  a>  "    s++;",
  a>  "  }",
  a>  "  printf(\"\\\",\\n\");",
  a>  "}",
  a>         NULL};
  a> /* Program printing the own text */
  a> main(){ int i;
  a>   puts(text[0]); puts(text[1]);
  a>   for(i=0; text[i]; i++) putq(text[i]);
  a>   for(i=2; text[i]; i++) puts(text[i]);
  a> }
  a> putq(s) char *s; {
  a>   printf("\t\"");
  a>   while(*s){
  a>     if(*s == '"')
  a>   printf("\\\"");
  a>     else if(*s == '\\')
  a>   printf("\\\\");
  a>     else
  a>   putchar(*s);
  a>     s++;
  a>   }
  a>   printf("\",\n");
  a> }
 
  Вполне устраивает. Удовлетворяет всем условиям задачи.
 
     E-mail: gate@fidonet.org.il
     Voice Phones: 972-4-8330554 (home), 972-5-4481073 (cell)
 
 Bye !
 Stanislav     (AKA Night's Man)                        [Team Technion]
 ---
  * Origin: Gate From Another World ... From Haifa, Israel (2:400/520)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

 Тема:    Автор:    Дата:  
 Re: Печать исходного кода   OAM   17 Sep 2001 09:04:12 
 Печать исходного кода   Stanislav Shwartsman   17 Sep 2001 13:49:35 
 Печать исходного кода   Mike Roschin   20 Sep 2001 23:13:08 
 Re: Печать исходного кода   Andrew Ezhguroff   21 Sep 2001 04:02:25 
 Печать исходного кода   Mike Roschin   21 Sep 2001 17:15:02 
 Печать исходного кода   Nickolas Hirgij   25 Sep 2001 00:28:40 
 Печать исходного кода   Michael Bolotnicov   28 Sep 2001 18:37:00 
 Re: Печать исходного кода   Comoderator Of Ru Algorithms   29 Sep 2001 08:33:06 
 Печать исходного кода   Stanislav Shwartsman   21 Sep 2001 06:08:33 
 Печать исходного кода   Michael Savin   21 Sep 2001 15:02:32 
 Re: Печать исходного кода   alexo   30 Sep 2001 02:48:37 
 Печать исходного кода   Stanislav Shwartsman   30 Sep 2001 07:23:30 
 Печать исходного кода   Vitaliy Kalinin   30 Sep 2001 15:28:00 
 Печать исходного кода   Stanislav Shwartsman   30 Sep 2001 21:08:35 
 Печать исходного кода   vitalie vrabie   22 Sep 2001 13:06:24 
 Печать исходного кода   Stanislav Shwartsman   25 Sep 2001 07:05:10 
 Печать исходного кода   vitalie vrabie   08 Oct 2001 00:42:06 
 Печать исходного кода   Evgeniy Jirnov   18 Sep 2001 08:07:22 
 Печать исходного кода   Mihail Vetchinoff   23 Sep 2001 00:16:40 
 Re: Печать исходного кода   Comoderator Of Ru Algorithms   23 Sep 2001 15:51:41 
 Печать исходного кода   Nickolas Hirgij   24 Sep 2001 07:00:33 
 Печать исходного кода   Sergey Kruk   26 Sep 2001 20:18:08 
 Печать исходного кода   Nickolas Hirgij   29 Sep 2001 00:12:41 
 Печать исходного кода   Nickita A Startcev   08 Oct 2001 02:37:10 
 Печать исходного кода   Ivan Sintyurin   14 Oct 2001 20:06:07 
 Печать исходного кода   Nickolas Hirgij   15 Oct 2001 07:21:10 
Архивное /ru.algorithms/17853bb6c88b.html, оценка 2 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional