Безотлагательно!!! ОЧЕНЬ СРОЧНО! ПОМОГИТЕ.... Дан массив, состоящий из целых чисел. Напишите
Безотлагательно!!! ОЧЕНЬ Безотлагательно! ПОМОГИТЕ.... Дан массив, состоящий из целых чисел. Напишите программку, которая определяет, есть ли в массиве пара соседних элементов с одинаковыми знаками. Входные данные Сначала задано число N количество частей в массиве (1N10000). Далее через пробел записаны N чисел элементы массива. Массив состоит из целых чисел. Выходные данные Необходимо вывести слово YES, если существует пара соседних элементов с схожими знаками. В противном случае следует вывести слово NO.
Задать свой вопрос1 ответ
Тимур
Запишем программку в Паскале, определяющая, есть ли в массиве пара примыкающих частей с схожими знаками.
Дано
Начало исполненья метода:
const
n=10000;
var
a:array[1..n]of integer;
i,n1, flag:integer;
begin
readln(n1);
for i:=1 to n1 do
read(a[i]);
for i:=1 to n1-1 do
if ((a[i]lt;0)and(a[i+1]lt;0))or
((a[i]gt;0)and(a[i+1]gt;0))then
flag:=1;
if flag=1 then
writeln(YES)
else
writeln(NO);
end.
Примечание: Конструкцию ((a[i]lt;0)and(a[i+1]lt;0)) or ((a[i]gt;0)and(a[i+1]gt;0)) можно заменить на (a[i]*a[i+1])gt;0
Дано
Начало исполненья метода:
const
n=10000;
var
a:array[1..n]of integer;
i,n1, flag:integer;
begin
readln(n1);
for i:=1 to n1 do
read(a[i]);
for i:=1 to n1-1 do
if ((a[i]lt;0)and(a[i+1]lt;0))or
((a[i]gt;0)and(a[i+1]gt;0))then
flag:=1;
if flag=1 then
writeln(YES)
else
writeln(NO);
end.
Примечание: Конструкцию ((a[i]lt;0)and(a[i+1]lt;0)) or ((a[i]gt;0)and(a[i+1]gt;0)) можно заменить на (a[i]*a[i+1])gt;0
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Анна хорошо учится у неё много подруг свободное от учёбы время
Обществознание.
10) Килограмм конфет дороже килограмма печенья на 52 р. За 8
Математика.
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Определить предложения какие они по цели высказывания и по интонации
Русский язык.
"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.
Русский язык.
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
Облако тегов