0 / 0 / 0
Регистрация: 26.04.2013
Сообщений: 7
1

Написать процедуру поиска в заданном массиве В, состоящем из 20-ти элементов, третьего положительного элемента и его индекса

20.05.2013, 20:49. Показов 1932. Ответов 1
Метки нет (Все метки)

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Sub Lab_5()
Dim A(1 To 20)
Dim ind As Integer, K As Integer, P As Integer
Dim Tittle As String
Dim String1 As String
Dim String2 As String
Dim String3 As String
Title = " Индексы элементов одномерного массива "
String1 = " Третье положительное число = "
String2 = " Индекс числа ="
For b = 1 To 20
A(b) = Int(21 * Rnd - 10)
Next
     ind = 0
For q = 1 To 10
  If A(q) > 0 Then
     ind = ind + 1
  End If
  If ind = 3 Then
     K = A(q)
     P = q
     Exit For
  End If
Next
MsgBox String2 & P & Chr(13) & String1 & K, , Title
End Sub

Вот собственно я составил, НО я просто заполнил массив случайными числами.
Если кто может помочь, нужно :
Для заданного условия составить процедуру и придумать несколько наборов тестовых данных для отладки. Возможно использование как статических массивов, так и динамических. Ввод исходных данных осуществить из файла. Предусмотреть вывод результата в файл или на лист рабочей книги Excel.
Спасибо за помощь
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.05.2013, 20:49
Ответы с готовыми решениями:

Поиск в заданном массиве В, состоящем из 10-ти элементов, третьего положительного элемента и его индекса
Для заданного условия составить процедуру и придумать несколько наборов тестовых данных для...

Написать программу для поиска в заданном массиве В, состоящем из 10-ти элементов, третьего положительного
Написать программу для поиска в заданном массиве В, состоящем из 10-ти элементов, третьего...

Поиск в заданном массиве третьего положительного элемента и его индекса
Нужно: Написать программу поиска в заданном массиве B, состоящем из 20-ти элементов, третьего...

Написать процедуру поиска индекса n-го по счету нулевого элемента в одномерном массиве
Написать процедуру поиска индекса n-го по счету нулевого элемента в одномерном массиве. Значение n...

1
4377 / 661 / 36
Регистрация: 17.01.2010
Сообщений: 2,134
21.05.2013, 16:59 2
Создайте две процедуры. Одна - запись массива на лист (через Randomize). И вторая - уже работа с полученной матрицей на листе, которюу Вы быстро заганяете в массив, в нем обрабатываете и на лист результаты. А это я не понял:
...и придумать несколько наборов тестовых данных...
Что-то в стиле debug.print? Или несколько матриц? Если последнее - тогда вложите первую процедуру в вторую. Самая первая операция - очистка листа от данных. Вторая - вызов процедуры записи массива... И щелкайте запуск с утра до вечера - всегда новые результаты.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.05.2013, 16:59
Помогаю со студенческими работами здесь

Напишите программу поиска в одномерном массиве максимального элемента и его индекса
Напишите программу поиска в одномерном массиве максимального элемента и его индекса. Для элементов...

Написать функцию вычисления линейного индекса элемента (его номера расположения в памяти) по заданым размерам и индексам элемента в N-мерном массиве
Елементи N-вимірного масиву розміром n розміщуються в послідовних ділянках пам'яті так, що швидше...

Написать процедуру поиска суммы индексов первого и последнего нулевого элемента в одномерном массиве
Добрый день! Собственно такая задача: Написать процедуру поиска суммы индексов первого и...

Написать процедуру поиска данных элементов в введенном с клавиатуры массиве
Задание звучит так: Пусть дана непустая последовательность символов цифр, букв, знаков препинания....

Написать программу поиска номеров строки и столбца минимального и максимального элемента в заданном двухмерном массиве целых чисел
Написать программу поиска номеров строки и столбца минимального и максимального элемента в заданном...

Сумма каждого третьего положительного элемента последовательности, начиная с первого положительного
Дана целочисленная последовательность. Признаком завершения последовательности является ноль,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru