Массив содержащий 10 случайных чисел выводится на экран все числа с четными индексами и отдельно с нечетными индексами.

@сергей55555 · Регистрация: 17.04.2011

Студворк — интернет-сервис помощи студентам

массив содержащимся 10 случайных чисел выводится на экран все числа с четными индексами и отдельно с нечетными индексами.

@YuraAAA · 06.05.2011, 15:27

Что же ты в универе делаешь?

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
Dim Arr(1 To 10) As Single
Dim a As String, b As String, c As String
For i = 1 To 10
Arr(i) = Int(100 * Rnd - 50)
a = a & Arr(i) & " "
Select Case i
Case 1, 3, 5, 7, 9
    b = b & Arr(i) & " "
Case Else
    c = c & Arr(i) & " "
End Select
Next i
MsgBox a & Chr(13) & b & Chr(13) & c

@сергей55555 · 06.05.2011, 16:31 **[ТС]**

А МОЖНО КАК НИБУДЬ ЭТО ЖЕ НО С ОПЕРАТОРАМИ RANDOMIZE REDIM

@YuraAAA · 06.05.2011, 16:46

RANDOMIZE вставь перед For i = 1 To 10
REDIM - нахрена?
З.Ы. капс почини

@сергей55555 · 06.05.2011, 17:03 **[ТС]**

что то я вообще не въехал в задании написано же что чет.индексы и нечет. индексы надо как то отдельно.

@YuraAAA · 06.05.2011, 18:08

Visual Basic
1
2
3
4
5
6
Select Case i 'получаем величину индекса
Case 1, 3, 5, 7, 9 'Если он нечётный то управление передаётся_
    b = b & Arr(i) & " " '_сюда. В текстовую переменную b собираем нечётные индексы
Case Else 'иначе
    c = c & Arr(i) & " " 'толкаем в c c
End Select

@сергей55555 · 19.05.2011, 18:49 **[ТС]**

неправильно!Училка психанула и говорит что ей нужно четные индексы в одно окошко а нечетные индексы в другое(типа text ей нужен) а сам что то тупанул не получается.

@_Лёша_ · 19.05.2011, 19:15

Сообщение от сергей55555

неправильно!Училка психанула и говорит что ей нужно четные индексы в одно окошко а нечетные индексы в другое(типа text ей нужен) а сам что то тупанул не получается.

1.Конечно, это для тебя наверное задача сложная вывести значения переменных b и c в 2 текстбокса

Не по теме:

2.YuraAAA все правильно объяснил.
3.В ТС про вывод результата ничего не было оговорено.
4. Человек помог - скажи спасибо, он делает тебе большое одолжение, тратя на тебя двоечника время. Он тебе аж построчно все разжевал :D

@сергей55555 · 19.05.2011, 19:20 **[ТС]**

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

@SuPeR XaKer · 19.05.2011, 19:32

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

Ни чё что эти числа записали в 2 разные строки (b и с)?
Text1.Text = b
Text2.Text = c

Училка психанула и говорит что ей нужно четные индексы

Не по теме:

если она психованая то думаю зря её приняли на работу где людей учить нужно.

@сергей55555 · 20.05.2011, 09:34 **[ТС]**

спасибо конечно что уделили время ,но дело в том что нужны индексы а не индекс то есть надо не по одному индексу в каждое окошко а разделить массив из 10 чисел по четности и не четности.ЗАранее спасибо!

@SuPeR XaKer · 20.05.2011, 11:05

парень либо твоя училка не догоняет либо ты.ты не знаешь что такое элемент с чётным номером чтоли?Их и выводят в программе.Осуществляется проверка на чёность и нечётность индекса а не самого элемента массива.
Ну а если вы этого не понимаете то сомневаюсь что YuraAAA или кто-либо другой сможет вам это объяснить.

выводится на экран все числа с четными индексами и отдельно с нечетными индексами

@сергей55555 · 20.05.2011, 13:24 **[ТС]**

Ладно,на этом спасибо!

@SuPeR XaKer · 20.05.2011, 13:27

надеюсь теперь ты сможешь объяснить что есть чётный и нечётный индекс элемента массива,а что есть чётный и нечётный элемент массива.

Новые блоги и статьи Все статьи Все блоги /
Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .	Контроль уникальности заводского номера - вариант №2 Maks 24.03.2026 В отличие от предыдущего варианта добавлено прерывание циклов, также добавлены новые переменные для сохранения контекста ошибки перед прерыванием цикла: Процедура ПередЗаписью(Отказ, РежимЗаписи,. . .	SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++ 8Observer8 24.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip	Жизнь в неопределённости kumehtar 23.03.2026 Жизнь — это постоянное существование в неопределённости. Например, даже если у тебя есть список дел, невозможно дойти до точки, где всё окончательно завершено и больше ничего не осталось. В принципе,. . .
Модель здравоСохранения: работники работают быстрее после её введения. anaschu 23.03.2026 geJalZw1fLo Корпорация до введения программа здравоохранения имела много невыполненных работниками заданий, после введения программы количество заданий выросло. Но на выплатах по больничным это. . .	Контроль уникальности заводского номера - вариант №1 Maks 23.03.2026 Алгоритм контроля уникальности заводского (или серийного) номера на примере документа выдачи шин для спецтехники с табличной частью в КА2. Данные берутся из регистра сведений, по которому настроено. . .	Хочу заставить корпорации вкладываться в здоровье сотрудников: делаю мат модель здравосохранения anaschu 23.03.2026 e7EYtONaj8Y Z4Tv2zpXVVo https:/ / github. com/ shumilovas/ med2. git	Программный отбор элементов справочника по группе Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа в КА2. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию. . .

@сергей55555 1 / 1 / 0 Регистрация: 17.04.2011 Сообщений: 31

	Массив содержащий 10 случайных чисел выводится на экран все числа с четными индексами и отдельно с нечетными индексами. 06.05.2011, 13:04. Показов 5463. Ответов 13 Метки нет (Все метки) массив содержащимся 10 случайных чисел выводится на экран все числа с четными индексами и отдельно с нечетными индексами. 0

@сергей55555 1 / 1 / 0 Регистрация: 17.04.2011 Сообщений: 31
	06.05.2011, 16:31 [ТС]
	А МОЖНО КАК НИБУДЬ ЭТО ЖЕ НО С ОПЕРАТОРАМИ RANDOMIZE REDIM 0

@YuraAAA 1605 / 1337 / 291 Регистрация: 25.10.2009 Сообщений: 3,487 Записей в блоге: 2
	06.05.2011, 16:46
	RANDOMIZE вставь перед For i = 1 To 10 REDIM - нахрена? З.Ы. капс почини 0

@сергей55555 1 / 1 / 0 Регистрация: 17.04.2011 Сообщений: 31
	06.05.2011, 17:03 [ТС]
	что то я вообще не въехал в задании написано же что чет.индексы и нечет. индексы надо как то отдельно. 0

@сергей55555 1 / 1 / 0 Регистрация: 17.04.2011 Сообщений: 31
	19.05.2011, 18:49 [ТС]
	неправильно!Училка психанула и говорит что ей нужно четные индексы в одно окошко а нечетные индексы в другое(типа text ей нужен) а сам что то тупанул не получается. 0

@сергей55555 1 / 1 / 0 Регистрация: 17.04.2011 Сообщений: 31
	19.05.2011, 19:20 [ТС]
	я могу вывести, но не пойму как разделить эту хрень на четные числа и нечетные числа по разным местамю 0

@сергей55555 1 / 1 / 0 Регистрация: 17.04.2011 Сообщений: 31
	20.05.2011, 09:34 [ТС]
	спасибо конечно что уделили время ,но дело в том что нужны индексы а не индекс то есть надо не по одному индексу в каждое окошко а разделить массив из 10 чисел по четности и не четности.ЗАранее спасибо! 0

@сергей55555 1 / 1 / 0 Регистрация: 17.04.2011 Сообщений: 31
	20.05.2011, 13:24 [ТС]
	Ладно,на этом спасибо! 0

@SuPeR XaKer 2857 / 1986 / 788 Регистрация: 23.09.2010 Сообщений: 4,876
	20.05.2011, 13:27
	надеюсь теперь ты сможешь объяснить что есть чётный и нечётный индекс элемента массива,а что есть чётный и нечётный элемент массива. 1