НЧ
Николай Чернов

дано целое число n и массив случайных положительных и отрицательных чисел

Дано целое число n и массив случайных положительных и отрицательных чисел T[1..n](T:=random(n)-n div 2)в массиве Т определить число соседств двух положительных чисел и двух чисел разного знака.

ЮЛ
Юляша Л

randomize;
for i:=1 to n do
t [ i ] :=random(n) - n div 2;
вот и массив готов

Похожие вопросы
Дана последовательность целых чисел (массив). Определить какое положительное число встречается раньше: наибольшее просто
чуваки помогите плз! дан массив A(n).вывести в порядке следования: все отрицательные числа, затем все положительные числа.
Дана матрица целых чисел N*N. С++
Array 27 . Дан массив ненулевых целых чисел размера N. Проверить, чередуются ли в нем положительные и отрицательные числ
Дан массив А из N целых чисел. Сформировать новый массив B...
дан массив из целых чисел из n элементов заполненный случайным образом числами из промежутка [15;-15].
Дана последовательность целых чисел . Выяснить, какое число встречается раньше — положительное или отрицательное.
Паскаль. Даны четыре целых числа. Найти произведение положительных и отрицательных чисел.
Задан массив целых чисел X(n). Все простые числа переписать в массив Y.
Паскаль, нужно вывести через пробел N случайных целых чисел, дано N.