В последовательности целых чисел определить, имеются ли в ней два идущих подряд положительных элемента. Подсчитать количество таких пар. (без массивов, Pascal)
Писал на PascalABC.Net v.3.2, сборка 1325 (19.10.2016) Исходный программный код решения находится в приложении ниже (видно только на веб-сайте).