17036

Одномірні масиви в Visual BASIC

Лабораторная работа

Информатика, кибернетика и программирование

Лабораторна робота №14 Тема. Одномірні масиви Мета: відробити прийоми створення одномірних статичних масивів у VB. Обладнання: ПК ПЗ VB 6.0. Хід роботи Індивідуальне завдання. Скласти програму в VB 6.0 для розвязання задачі. 19 ...

Украинкский

2013-06-29

39 KB

8 чел.

Лабораторна робота №14

Тема. Одномірні масиви

Мета: відробити прийоми створення одномірних, статичних  масивів у VB.

Обладнання: ПК, ПЗ VB 6.0.

Хід роботи

Індивідуальне завдання.

Скласти програму в VB 6.0 для розв’язання задачі.

19

Знайти кількість елементів менших заданого значення w.

Листинг

Результат

Private Sub Command1_Click()

Dim a(1 To 5) As Double, i As Integer, w As Double, l As Integer

a(1) = Text1.Text

a(2) = Text2.Text

a(3) = Text3.Text

a(4) = Text4.Text

a(5) = Text5.Text

w = Text6.Text

For i = 1 To 5

If a(i) < w Then l = l + 1

Next

Text7.Text = l

End Sub

Контрольні питання.

  1.  Дайте визначення масиву.
  2.  Дайте визначення статичного масиву.
  3.  Синтаксис оголошення одномірного масиву.


 

А также другие работы, которые могут Вас заинтересовать

49105. Прогнозирование результатов спортсменов 486 KB
  Работа над проектом Для решения поставленной задачи будем использовать персептрон основанный на нейронной сети с 14ю входами с 1 выходным и с одним скрытым слоем. Одна из наиболее привлекательных для пользователя сторон нейросетевой технологии обеспечившая ей нынешнюю всеобщую популярность отсутствие необходимости в детальном программировании процесса решения задачи; возможность решения даже тех задач для которых отсутствуют алгоритмы решения; возможность адаптации к условиям функционирования обучения и переобучения....
49107. Ревизия (аудит) расчетов с депонентами, по претензиям, по возмещению материального ущерба, с разными дебиторами и кредиторами 103.25 KB
  Дебиторская задолженность - сумма долгов, причитающихся объединению, предприятию, организации, учреждению от юридических или физических лиц в итоге хозяйственных взаимоотношений с ними. Кредиторская задолженность - денежные средства предприятия, организации или учреждения, подлежащие уплате соответствующим юридическим или физическим лицам.
49108. Дослідження соціалізації дітей дошкільного віку 361.5 KB
  Пошук основних особистісних та середовищних детермінант, що визначають ті проблеми, з якими стикаються діти дошкільного віку, а також основні підходи щодо процесу соціалізації та адаптації, є актуальним завданням в сучасних умовах трансформації освіти України.
49109. Архитектура и системы команд микропроцессора К580. Достоинства и недостатки ассемблера 119.5 KB
  Недостатки ассемблера ВВЕДЕНИЕ Достоинства ассемблера Обеспечение максимального использования специфических возможностей конкретной платформы что позволяет создавать более эффективные программы с меньшими затратами ресурсов. АНАЛИЗ ЗАДАЧИ И РАЗРАБОТКА АЛГОРИТМА В результате выполнения программы мы должны получить в регистре В значение равное 0. РАЗРАБОТКА СТРУКТУРЫ ПРОГРАММЫ Для реализации поставленной задачи нужно запомнить входные данные В программе осуществляется последовательное увеличение содержимого ячейки 6000h на 1 путем...
49110. Загрузить в ячейку памяти с адресом 6000h число 100 и уменьшать его на единицу, пока результат не станет равен нулю 146.5 KB
  Именно языки программирования высокого уровня и их наследники в основном используются в настоящее время в индустрии информационных технологий. Однако, языки ассемблера сохраняют свою нишу, обуславливаемую их уникальными преимуществами в части эффективности и возможности полного использования специфических средств конкретной платформы.
49111. Вычесть содержимое ячейки памяти с адресом 6001H из содержимого ячейки памяти с адресом 6000Н. Занести результат в ячейку памяти с адресом 6002H, если результат положительный, иначе — в ячейку 6003Н 433 KB
  Директивы ассемблера позволяют включать в программу блоки данных (описанные явно или считанные из файла); повторить определённый фрагмент указанное число раз; компилировать фрагмент по условию; задавать адрес исполнения фрагмента, менять значения меток в процессе компиляции; использовать макроопределения с параметрами и др.
49113. Диэлектрическая линзовая антенна 1.83 MB
  Расчёт параметров линзы. Линзовые антенны представляют собой совокупность электромагнитной линзы и облучателя. В основе проектирования линзовых антенн лежит использование оптических свойств электромагнитных волн которые проявляются при размерах и радиусах кривизны поверхности линзы много больших длины волны. Сейчас зачастую используются металлодиэлектрические линзы которые обладают лучшими массогабаритными показателями но при этом коэффициент преломления таких линз оказывается сильно зависящим...