15) Составить программу, удовлетворяющую следующим условиям.

Программа вводит с клавиатуры непустую последовательность целых положительных не более чем трехзначных чисел, после которой идет целое число ноль. Само число ноль в последовательность не входит. Не требуется, чтобы программа проверяла непустоту последовательности, положительность или не более чем трехзначность вводимых элементов последовательности. Программа не должна использовать массивы. Программа должна подсчитать количество нерасширяемых строго возрастающих и нерасширяемых строго убывающих участков последовательности. Строго возрастающим (соответственно, убывающим) участком называется набор из двух или более подряд идущих элементов последовательности, каждый из которых, кроме первого, больше (соответственно, меньше) предыдущего элемента данного набора. Строго убывающий (соответственно, возрастающий) участок называется нерасширяемым, если он не содержится в большем строго убывающем (соответственно, возрастающем) участке данной последовательности.

Кроме того, программа должна определить, верно ли, что в каждом строго возрастающем участке и в каждом строго убывающем участке элементы образуют арифметическую прогрессию.

В первой строке программа должна вывести количество нерасширяемых строго возрастающих участков последовательности, во второй строке – количество нерасширяемых строго убывающих участков, а в третьей строке – слово "YES" (без кавычек), если в каждом строго возрастающем участке и в каждом строго убывающем участке элементы образуют арифметическую прогрессию, и слово "NO" (без кавычек) в противном случае. Программа не должна ничего выводить на экран, кроме того, что указано выше.

Каждое исходное число вводится отдельной командой "ввод"

16) Составить программу, удовлетворяющую следующим условиям.

Программа вводит с клавиатуры непустую последовательность целых положительных не более чем трехзначных чисел (не более одной тысячи элементов), после которой идет целое число ноль. Само число ноль в последовательность не входит. Не требуется, чтобы программа проверяла непустоту последовательности, положительность или не более чем трехзначность вводимых элементов последовательности. Программа не должна использовать массивы. Программа должна подсчитать количество нерасширяемых строго убывающих участков последовательности. Строго убывающим участком называется набор из двух или более подряд идущих элементов последовательности, каждый из которых, кроме первого, меньше предыдущего элемента данного набора. Строго убывающий участок называется нерасширяемым, если он не содержится в большем строго убывающем участке данной последовательности.

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

В первой строке программа должна вывести количество нерасширяемых строго убывающих участков последовательности, а во второй строке – слово "YES" (без кавычек), если средние арифметические элементов строго убывающих участков образуют строго убывающую последовательность, и слово "NO" (без кавычек) в противном случае. Программа не должна ничего выводить на экран, кроме того, что указано выше.

Каждое исходное число вводится отдельной командой "ввод"