СГ>2) Для того чтобы написать свою программу нужно создать новый документ.

Предположим. В этом случае мне не видно Log, ошибки все равни выводятся в тексте программы. А это неочевидно и неинтуитивно Если текст программы не вмещается в экран? А из-за идиотского расположения окон он не будет никогда, то мне что, весь текст программы сканировать на предмет наличия ошибок? А что мне с ошибками потом делать? Стирать их, или они не влияют на компиляцию? То, что они не влияют на компиляцию неочевидно, так как они торчат прямо посреди текста и нарушают восприятие программы

СГ>3) Контролы, вообще-то, принято помещать на формы.

Контролы, вообще-то, не принято вставлять внутрь исходного кода программы.

- вы неправильно написали программу на обероне
— это не оберон, это модула-2
— это не модула, это зоннон
— вы пишите код не туда, куда надо
— компонентность- это круто
— gc — это круто
— паскальный синтаксис — это круто

- Синтаксис Оберона является превосходящим по отношению к С-подобному синтаксису
— Модульный подход Оберона к написанию програм являтся единственно верным подходом
— Оберон является языком, превосхожящим С/С++ по гибкости стройности и проч.
— Среда BlackBox является превосходной системой для написания кода и для изучения в школах

- В обероне такого нет.
— Сборщик мусора с этим справится
— Система сама разберется
— Идите учите мат. часть

Everything is alright with me. It's reality that' playing tricks

Пункт 5. Не допускается проявление грубого или неуважительного отношения к другим участникам форума. Оскорблять и обзывать собеседника, ставить под сомнение его профессиональную квалификацию, придираться к его нику, указывать на орфографические и синтаксические ошибки и т. д. запрещается

...
Мы, без сомнения, неприязненно относимся к людям, предположительно не желающим подумать или поучиться прежде, чем задавать вопросы. Такие люди убивают время — они берут, ничего не давая взамен, они отнимают время, которое мы могли бы посвятить другому вопросу, более интересному, и другому человеку, более достойному ответа.
...
Мы (в основном) — добровольцы. Мы посвящаем время своей нелегкой жизни ответам на вопросы, и временами мы не справляемся со шквалом вопросов. Поэтому приходится безжалостно "фильтровать базар". В частности, отбрасывать вопросы потенциальных неудачников, чтобы потратить отведенное на ответы время более эффективно, посвящая его победителям.
...
Нам нравится отвечать людям, продемонстрировавшим свою способность воспринимать ответы.
...
Подготовьте вопрос. Продумайте его. На поверхностные вопросы вы получите поверхностные ответы, или вообще ответов не получите.
...
неплохо сразу ясно дать понять, что вы можете и хотите помочь в процессе выработки решения.
...
Вежливость никогда не повредит, и иногда помогает
...
Не реагируйте как неудачник

Вполне вероятно, что вы уже облажались несколько раз в хакерских форумах — так, как описано в этой статье, или аналогично. И вам уже объяснили, как именно вы облажались, возможно, в красках. При всем честном народе.

Когда такое происходит, самая неудачная реакция — жаловаться на случившееся, считать себя оскорбленным словесно, требовать извинений, вопить, задыхаться от гнева, подавать иски в суд, жаловаться работодателям обидчиков, не опускать за собой сидения унитаза и т.п. Вместо всего этого надо сделать следующее:

Смириться. Это — нормально. На самом деле, это хорошо и целесообразно.
...

П>>WHILE a DO 
П>>    IF a THEN ...; EXIT END;
П>>END
П>>

while not end of stream
  read socket    
  calculate checksum
  if checksum fails
    raise hacker alert
    exit
  else
    calculate number of bytes read
    if number of bytes greater than MAX_DATA_ALLOWED
      exit
    end if 
    process data
  end if
end while

if(a){b=c;}

IFaTHENb=c;END

СГ>WHILE p DO 
СГ>  ... 
СГ>END; 
СГ>ASSERT(~p) 
СГ>

СГ>while (p)
СГ>{ 
СГ>  ... 
СГ>}
СГ>assert(!p) 
СГ>

   for (i=0; i < N; i++)
      if (a[i] < 0)
         break;

   for (i=0; a[i]>=0 && i < N; i++);