Question

Дана программа. Определить результат выполнения. program N02; const A: array [1..10] of integer = (1,36,2,18,3,12,4,9,6,6); var i,k: integer; begin k:=0; for i:=1 to 7 do if A[i] write(k) end.

Answer 1

Программа выдаст ошибку, потому что конструкция if в Паскале должна содержать ключевое слово "then", которого здесь нет.

Answer 2

К сожалению, предоставленная программа не компилируется, поскольку в операторе if отсутствует условие. Для правильного определения результата выполнения программы необходимо добавить условие в оператор if. После исправления этой ошибки будет возможно более точно определить результат выполнения программы.