Ошибка "встречено 'for' а ожидался идентификатор" var mas: array[1..15] of integer; i, sum: integer; sum: =0; for i: = 1 to 15 do mas[i]: =random(101); эта строка красным выделена for i: = 1 to 15 do write (mas[i]: 3); for i: = 1 to 15 do if (mas[i]> mas[i+1]) and (mas[i]> mas[i-1]) and (mas[i+1]+mas[i-1]> sum) then sum: =mas[i+1]+mas[i-1]; writeln(sum); end.

После определения переменных следует писать   begin как начало функции. p.s. сори, не заметил, что уже ответили

1) школа - это искусственная система. 2) подсистемы - классы: 1а, 1б, 5 в и т.д 3) материальные связи в системе школы - кабинеты, оборудование для проведения уроков. информационные связи между объектами школы - дневники учащихся, журналы класса, объявления печатные и устные  для классов, проведение линеек и тд. 4) в структуре школы следует изменить степень ответственности за выполнение законов рф не только со стороны учителей но и со стороны детей и родителей, уровень доступности и открытости информации должен быть мобильным - ведение электронных дневников позволит родителям быстро и точно узнавать о проблемах своих детей в школе, быстрее реагировать.

Собирается-журналист  опрашивает  людей  для  статьи обрабатывается-ученик  решает  -учитель  объясняет  материал  создается-все  тот  же  журналист  придумывает  статью запоминается-парнеь запоминает  номер  телефона  девушки измеряется-программист  рассчитывает  сколько  бит  займет  программа копируется-ученик  списывает  у  одноклассника передается-две  девушки  обмениваются  новостями принимается-ученики  слушают  учителя  на  уроке разрушается-придуманная  выше  указанным  журналистом  статья  делится  на  части-человек  разбирает  сообщение  в  котором  пропущены  пробелы ищется-человек  ищет  материал  для  доклада  в  интернете