Сделай цикл по входному массиву значений.
Только смотри что у тебя в конце.
схема будет типа:
Код:
[вход - массив 1..N значений VA.]
|
i := 1
|<-------------------------------------|
|--no-- VA[i]>=0 ----yes--------| |
V V |
|-no- VA[I+1] >= 0 -yes-| |-no- VA[i] = 0 -yes-| |
V V V V |
Z := 1 Z := -1 I := I+1 GOTO |
| | | |
??? ??? | |
V |
|-no- I < N ----yes--------------|
|
V
[EXIT]
Только проверь - что у тебя после установки Z происходить должно и куда GOTO ведет. Ну и там, возможно, должен быть доп. блок для обработки последнего значения входного массива - там нет сл. элемента.