/*
 * Собирать: 
 *      gcc -include stih.h -o stih stih.c
 * Посмотреть вывод препроцессора:
 *      gcc -E -include stih.h -o stih stih.c
 */

/*
 * stih.h
 */
#include <stdio.h>

#define NACHALO int main() {\
                  char *out = NULL; \
                  char *txt = NULL; \
                  FILE *fp  = NULL;
#define KONETS    return 0;}
#define PROGRAMMY

#define Vyvedi
#define tekst
#define na
#define v
#define ekran out = NULL
#define fajl out =

#define nachalo ; if (out == NULL) \
                    fp = stdout;\
                  else \
                    fp = fopen(out, "w"); txt =
#define konets ; if (fp != NULL)\
                 {\
                  if (txt != NULL) fprintf(fp, "%s", txt);\
                  if (fp != stdout) fclose(fp); \
                 }
#define teksta


/*
 * stih.c
 * Тут перевел в транслит, т.к. gcc (только ли он?) не поддерживает #define РУССКИЙ
 * в общем, сути не меняет
 */
NACHALO PROGRAMMY

Vyvedi tekst na ekran

nachalo teksta
"YA pomnyu chudnoe mgnoven'e: \n\
Peredo mnoj yavilas' ty, \n\
Kak mimoletnoe viden'e, \n\
Kak genij chistoj krasoty."
konets teksta

Vyvedi tekst v fajl "Stikh.txt"

nachalo teksta
"V tomlen'yakh grusti beznadezhnoj\n\
V trevogakh shumnoj suety,\n\
Zvuchal mne dolgo golos nezhnyj\n\
I snilis' milye cherty."
konets teksta

KONETS PROGRAMMY