Ошибка "встречено '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.
P.S. Сори, не заметил, что уже ответили