Паскаль ABC. Прошу помочь написать программу.

[Helen1]

ввела эти числа, и все равно выходит число "9"

[Sciv]

Сообщение от Mad_Cat

почти)
Нужно вывести количество пар положительных чисел

1 2 -1 2 3 4 -2 -3 -5 6 - тут 3 пары [1,2] [4,5] [5,6]

Тьфу ты, ну тупил я под конец рабочего дня. Поздравьте меня соврамшего

Конечно же количество соседних положительных чисел, а не одинаковых

ввела эти числа, и все равно выходит число "9"

Проверил - выводит правильно, 3 пары. Покажите-ка здесь Ваш код

[Poma][a]

ввела эти числа, и все равно выходит число "9"

А это я шаманю, пока не скажете спасибо господам помогавшим Вам в Ваших темах, не прекращу!