- 01
 - 02
 - 03
 - 04
 - 05
 - 06
 - 07
 - 08
 - 09
 - 10
 - 11
 - 12
 - 13
 - 14
 - 15
 - 16
 - 17
 - 18
 - 19
 - 20
 - 21
 - 22
 - 23
 - 24
 - 25
 - 26
 - 27
 - 28
 - 29
 - 30
 - 31
 - 32
 - 33
 - 34
 - 35
 - 36
 - 37
 - 38
 - 39
 - 40
 
                        // ------------------------------------------------
#include <stdio.h>
// ------------------------------------------------
#define USES         /##/
#define PROCEDURE    void
#define MAIN         main
#define VAR          /##/
#define INTEGER      32
#define BEGIN        {
#define END          }
#define FOR          for ( int
#define TO           ; X <
#define DO           ; X++)
#define WRITELN(a,b) printf("%d%c",a,b)
#define IF           if ((
#define THEN         /5*X) == 5)
#define ELSE         else
// ------------------------------------------------
USES CRT;
PROCEDURE MAIN()
VAR X : INTEGER
BEGIN
     FOR X = 1 TO 10 DO
     BEGIN
          IF X = 5 THEN
               WRITELN(-X,' ');
          ELSE
               WRITELN(X,' ');
     END;
END;
// ------------------------------------------------
                                 
        
#define = ==
#define := =
Чтобы смысл операторов соответствовал математическим обозначениям.
Во вторых я же уже кажется говорил, что все дельфийцы-паскалисты клоуны?
Ты сам не должен помнить что ты говорил, а что нет.
Другие люди пишут под никами, и только мне лениво логинится. Так что считайте что guest это всегда я.
Когда наконец PHPшная школота научится отличать C от C++ а JavaScript от Java>!
Скобки фтопку()
Где ':='?
Пропущено 2 ';', 1 лишняя, последнюю заменить на '.'
http://govnokod.ru/3346
Говнокод и фейл.