Const
n = 20;
var
a: array[1..n] of integer;
i: integer;
flag: boolean;
begin
Randomize;
Writeln('Элементы массива');
for i := 1 to n do
begin
a[i] := Random(19999) - 9999;
Write(a[i]:6);
end;
Writeln;
i := 1;
flag := False;
repeat
flag := (sign(a[i]) = sign(a[i + 1]));
i := i + 1
until flag or (i > n);
if flag then Writeln('Есть пара соседних элементов с одним знаком')
else Writeln('Нет пар соседних элементов с одним знаком')
end.
<u>Тестовое решение:</u>
Элементы массива
2440 -2414 -3192 -6912 -8537 7364 2869 -2505 8875 2662 401 7398 2213 8804 2039 1485 4213 8359 -2410 -5844
Есть пара соседних элементов с одним знаком
10 12 14 16 18 20
Получается шесть
Результат выполнения алгоритма показан на прилагаемом рисунке. Начальная точка может быть любой (не обязательно 0,0).
ПО - программное обеспечение - является группой программ, обеспечивающих решение некоторой задачи (учет фантиков от конфет), ведение некоторого процесса (просмотр фотографий котиков), работу некоторого отдела (бухгалтерии) и т.п. Эта самая группа программ - безымянна, ПО не может иметь своего имени. Нельзя говорить ПО "Фантики", ПО "Котики" или ПО "Бухгалтерия" - это попросту звучит не по-русски. Вместо этого говорят ПО учета фантиков, ПО просмотра фотографий, ПО бухгалтерии.
Поскольку у ПО нет имени, всегда можно обозвать его как-нибудь по-другому. ПО просмотра фотографий вполне может превратиться в ПО просмотра котиков - или войти в состав ПО комнаты отдыха. Если там находится один и тот же просмотрщик изображений Windows - то это будет одно и то же ПО, как его не назови.
ИС - информационная система, напротив, всегда именная. Вполне могут существовать ИС "Фантики", ИС "Котики" и ИС "Бухгалтерия". Впрочем, ИС просмотра фотографий также имеет право на существование (здесь название системы - это и есть "ИС просмотра фотографий"). Также для ИС не требуется, чтобы для ее компонентов существовал какой-то объединяющий признак - вполне допускается существование ИС "Фантики и Бухгалтерия", если, конечно же, такая ИС будет хоть кому-нибудь нужна.
С другой стороны, имя для ИС придумывается только тем, кто ее распространяет. Нельзя купить ИС "Фантики", а потом написать в документах, что куплена ИС "Пожиратель конфет" - это совершенно разные ИС, даже если они составлены из одних и тех же компонентов (хотя одна ИС все же может войти в состав другой - но обычно такие ИС называют все-таки не системами, а подсистемами).
Еще одно отличие ИС от ПО - ИС может содержать компоненты, не являющиеся программами или данными к ним. К примеру, в состав ИС, которая предоставляет пассажирам на вокзале расписание поездов, вполне могут входить информационные киоски. ПО же, как следует из названия, может содержать только программы, иначе будет зваться уже АПО (аппаратно-программное обеспечение).