Найти номер последнего отрицательного элемента массива.

Question

Найти номер последнего отрицательного элемента массива.

Answer 1

Пишу на QBasic
Нам уже дан заполненный массив
FOR I = (кол-во элементов массива) TO 1 STEP -1
IF A(I)<0 THEN<br>PRINT I
END
END IF

Comments

нужен Паскаль

---

В задании указано небыло, да и паскаль я знаю не очень