определить если 2 пары соседних элементов с одинаковыми знаками

[Yuuuu]

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

А вот это оскорбление между прочем!

Упс... не это имел в виду.
Один чувак-программист как-то накосячил просто очень сильно)))

[Inv1s]

перепостили 10 раз и не заметили
if (a[i] > 0 and a[i+1] > 0) or (a[i] < 0 and a[i] < 0)
и все же, перемножить 2 элемента по моему было проще:D

[Yuuuu]

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

А вот это оскорбление между прочем!

const
    n = 5;
var
    index, i: integer;;
    a:array[1..n] of integer;

вроде всё? или что-то забыли

Безрукий я, наверно. Но всё равно не выходит. На уроке может додумаю

[VIK_aka_TOR]

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

перепостили 10 раз и не заметили
if (a[i] > 0 and a[i+1] > 0) or (a[i] < 0 and a[i] < 0)
и все же, перемножить 2 элемента по моему было проще:D

у каждого свои предпочтения)... вот вы мне скажите... какой знак у 0 ?

[Yuuuu]

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

перемножить 2 элемента по моему было проще:D

А как это?????

[Inv1s]

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

у каждого свои предпочтения)... вот вы мне скажите... какой знак у 0 ?

А вот это другой вопрос, 0 не оговаривалось в задание, да и в твоем варианте он не проходит через условие проверки
Можно написать отдельный случай или сделать просто что 0 явл. положительным числом

[VIK_aka_TOR]

да мне просто интересно у кого какие взгляды на 0 ))) я знаю что не учитывается... так... поддержал флуд)

[Mad_Cat]

А как это?????

if a[i]*a[i+1]>0 then {есть пара}

[Inv1s]

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

да мне просто интересно у кого какие взгляды на 0 ))) я знаю что не учитывается... так... поддержал флуд)

У меня счас ноль ассоциируется с нормализованным вектором и прочей ерундой связанной с матрицами, т.к. надоело уже мучать 3D(((