QBasic

[064]

парни после завтра экзамен по информатике......не могу сделать 1 практическую!!!! помогите плиз кто чем может!!!!
язык QBasic
массивы
1 - В заданном массиве X(N) замените нулями отрицательные компоненты, а положительные - единицей
2 - Выведети на печать номера элементов заданного массива X(N), удовледворяюще условия 0<yi<1

[Z1000000]

CLS
RANDOMIZE TIMER
INPUT "Введите количество элементов массива"; n
DIM x(n)
FOR i = 1 TO n
x(i) = RND * 200 - 100
NEXT i
PRINT "Исходный массив"
FOR i = 1 TO n
PRINT x(i)
NEXT i
PRINT "Полученный массив"
FOR i = 1 TO n
IF x(i) < 0 THEN x(i) = 0 ELSE x(i) = 1
PRINT x(i)
NEXT i

CLS
RANDOMIZE TIMER
INPUT "Введите количество элементов массива"; n
DIM x(n)
FOR i = 1 TO n
x(i) = RND * 2 - 1
NEXT i
PRINT "Исходный массив"
FOR i = 1 TO n
PRINT x(i)
NEXT i
PRINT "Полученный массив"
FOR i = 1 TO n
IF x(i) > 0 AND x(i) < 1 THEN PRINT x(i)
NEXT i

[064]

огромное спасибо у меня два вопроса
что за оператор "RANDOMIZE TIMER" насколько я понял "RND" это тоже самое??
и второй...в подписи у тебя WM??

[T@Rak0t]

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

огромное спасибо у меня два вопроса
что за оператор "RANDOMIZE TIMER" насколько я понял "RND" это тоже самое??
и второй...в подписи у тебя WM??

RANDOMIZE TIMER - ставится для того что бы генерация случайных числе была зависима от времение, т.е. реально случайная, если это не написать то функция RND будет генерить постоянно одни и те же числа ( это удобно использовать при отладке, что бы можно было выделить проблемы при генерации некоторых чисел)

[064]

Сообщение от T@Rak0t

RANDOMIZE TIMER - ставится для того что бы генерация случайных числе была зависима от времение, т.е. реально случайная, если это не написать то функция RND будет генерить постоянно одни и те же числа ( это удобно использовать при отладке, что бы можно было выделить проблемы при генерации некоторых чисел)

спасибо...ппц.нахрен мне юисту это знать??))

[Игорян211]

помогите с практикой.
Задача:Имеется сто чисел А1,А2...А100. подсчитать сколько имеется троек равных соседних чисел в этом ряду.

[Z1000000]

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

огромное спасибо у меня два вопроса
что за оператор "RANDOMIZE TIMER" насколько я понял "RND" это тоже самое??

Уже ответил T@Rak0t

и второй...в подписи у тебя WM??

Да.