Каким образом можно задать последовательность чисел

@Magellan_ · Регистрация: 16.04.2011

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

Подскажите пожалуйста!!! В расчете задействована последовательность чисел x=0, 0.01, 0.05, 0.1, 0.5, 1, 2, 5, 10, 20, 50, 100, 1 000, 10 000, 1000 000. Каким образом её можно задать?

@Апострофф · 29.11.2011, 14:16

Наверно массивом, поскольку очевидной закономерности в этой последовательности не наблюдается?

@Magellan_ · 29.11.2011, 14:52 **[ТС]**

Но если задавать массивом это значит необходимо задавать отдельно, предположим от 0 до 0.01, а затем массив от 0.01 до 0.05 или по другому?

@gaw · 29.11.2011, 17:01

Visual Basic
1
x=array(0, 0.01, 0.05, 0.1, 0.5, 1, 2, 5, 10, 20, 50, 100, 1 000, 10 000, 1000 000)

@Magellan_ · 29.11.2011, 18:59 **[ТС]**

Поясните пожалуйста назначение array!!! По заданию даны формулы и диапазон частот, но попробовав на простом примере (A=1+x), где x выше указанный диапазон частот у меня ничего не получилось, если можно поясните синтаксис на этом примере. Заранее спасибо!!!

@gaw · 29.11.2011, 19:11

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Dim x()
Private Sub Command1_Click()
x = Array(1, 20, 3, 45, 76)
For i = LBound(x) To UBound(x) 'i = 0 To 4
Print " x ("; i; ") ="; x(i)
Next i
Print "A=1-x"
For i = LBound(x) To UBound(x) 'i = 0 To 4
Print " A ("; i; ") ="; 1 - x(i)
Next i
End Sub

@Magellan_ · 29.11.2011, 19:40 **[ТС]**

Спасибо всё работает, но поясните ещё, почему после Dim x () не указан тип переменной?

@gaw · 29.11.2011, 19:55

по умолчанию as Variant

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
Dim x() As Variant
Private Sub Command1_Click()
x = Array(1.12, "20e+2", 3 * 10 ^ (-2), "45e-2", 0.076)
For i = LBound(x) To UBound(x) 'i = 0 To 4
Print " x ("; i; ") ="; CDbl(x(i))
Next i
Print "A=1-x"
For i = LBound(x) To UBound(x) 'i = 0 To 4
Print "  /CDbl  "; " A ("; i; ") ="; CDbl(1 - x(i))
Print "  /CInt  "; CInt(1 - x(i))
Print "  /CSng  "; CSng(1 - x(i))
Next i
End Sub

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image 8Observer8 10.02.2026 Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .	Установка Qt-версии Lazarus IDE в Debian Trixie Xfce volvo 10.02.2026 В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer 8Observer8 08.02.2026 Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .	SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .

@Magellan_ 14 / 14 / 0 Регистрация: 16.04.2011 Сообщений: 236

	Каким образом можно задать последовательность чисел 29.11.2011, 14:10. Показов 1997. Ответов 7 Метки нет (Все метки) Подскажите пожалуйста!!! В расчете задействована последовательность чисел x=0, 0.01, 0.05, 0.1, 0.5, 1, 2, 5, 10, 20, 50, 100, 1 000, 10 000, 1000 000. Каким образом её можно задать? 0

@Апострофф 9908 / 3924 / 742 Регистрация: 11.10.2011 Сообщений: 5,904
	29.11.2011, 14:16
	Наверно массивом, поскольку очевидной закономерности в этой последовательности не наблюдается? 1

@Magellan_ 14 / 14 / 0 Регистрация: 16.04.2011 Сообщений: 236
	29.11.2011, 14:52 [ТС]
	Но если задавать массивом это значит необходимо задавать отдельно, предположим от 0 до 0.01, а затем массив от 0.01 до 0.05 или по другому? 0

@Magellan_ 14 / 14 / 0 Регистрация: 16.04.2011 Сообщений: 236
	29.11.2011, 18:59 [ТС]
	Поясните пожалуйста назначение array!!! По заданию даны формулы и диапазон частот, но попробовав на простом примере (A=1+x), где x выше указанный диапазон частот у меня ничего не получилось, если можно поясните синтаксис на этом примере. Заранее спасибо!!! 0

@Magellan_ 14 / 14 / 0 Регистрация: 16.04.2011 Сообщений: 236
	29.11.2011, 19:40 [ТС]
	Спасибо всё работает, но поясните ещё, почему после Dim x () не указан тип переменной? 0