Форум программистов, компьютерный форум, киберфорум
Наши страницы

Visual Basic

Войти
Регистрация
Восстановить пароль
 
sanekmihailow
0 / 0 / 1
Регистрация: 29.12.2011
Сообщений: 26
#1

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

19.06.2012, 14:09. Просмотров 646. Ответов 5
Метки нет (Все метки)

Определите номер максимального элемента последовательности, попадающего в диапазон допустимых значений типа Byte
Последовательность Фибоначчи определяется следующим образом: F(0)=1; F(1)=1; F(n)=F(n-1)+F(n-2), n>2. Определите номер максимального элемента последовательности, попадающего в диапазон допустимых значений типа Byte.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.06.2012, 14:09
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Определите номер максимального элемента последовательности, попадающего в диапазон допустимых значений типа Byte (VB):

Как найти номер максимального элемента массива - Visual Basic
В одномерном массиве, который состоит из эн действительных элементов, вычислить: 1) номер максимального элемента массива; 2)...

Как найти порядковый номер элемента последовательности - Visual Basic
Вводится последовательность ненулевых чисел, 0-конец последовательности.Найти наименьшее из всех чисел, меньших 15 и его порядковый номер. ...

Найти номер максимального элемента последовательности - C++
в программировании не очень силен,на завтар нужно написать программу .а я не знаю как Дана последовательность из n целых чисел. Найти...

Номер и значение максимального элемента последовательности - C++
Добрый вечер. Нужно составить программу, не знаю как. Из имеющегося материала извлечь пользы не получается. Буду рад любой помощи. ...

Найти номер максимального элемента в последовательности - C++
На зачет дали 4 задачи, нужна ваша помощь в их решении 1.Дана последовательность из n целых чисел. Найти номер максимального элемента...

Найти номер максимального элемента в последовательности - C++
7. Дана последовательность из n целых чисел. Найти номер максимального элемента в этой последовательности. без массивов

5
sanekmihailow
0 / 0 / 1
Регистрация: 29.12.2011
Сообщений: 26
19.06.2012, 19:23  [ТС] #2
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Command2_Click()
Dim N As Integer
Dim F As Integer
Dim I As Integer
Dim a1 As Integer
Dim a2 As Integer
N = Val(Text1.Text)
F = 0
a1 = 0
a2 = 1
For I = 1 To N
F = a1 + a2
ребят помогите продолжить
0
SoftIce
comment ca va
10256 / 3767 / 967
Регистрация: 27.07.2011
Сообщений: 9,108
Завершенные тесты: 1
19.06.2012, 20:23 #3
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
    Private Sub Command1_Click()
        Dim n  As Integer
        
        Do Until Fib(n) > 255
             n = n + 1
        Loop
        
        n = n - 1
        Print "Число "; n; "   Число Фибоначчи   "; Fib(n)
    End Sub
 
    Public Function Fib(num As Integer) As Integer
        If num <= 1 Then
               Fib = num
        Else
               Fib = Fib(num - 1) + Fib(num - 2)
        End If
    End Function
1
sanekmihailow
0 / 0 / 1
Регистрация: 29.12.2011
Сообщений: 26
19.06.2012, 20:57  [ТС] #4
извиняюсь,но возможно где-то ошибка
Определите номер максимального элемента последовательности, попадающего в диапазон допустимых значений типа Byte

Определите номер максимального элемента последовательности, попадающего в диапазон допустимых значений типа Byte
0
SoftIce
comment ca va
10256 / 3767 / 967
Регистрация: 27.07.2011
Сообщений: 9,108
Завершенные тесты: 1
19.06.2012, 21:03 #5
Цитата Сообщение от sanekmihailow Посмотреть сообщение
извиняюсь,но возможно где-то ошибка
Откуда у Вас взялись последние две строчки? (Которые синим выделены)
Visual Basic
1
2
 End Function 
 End Sub

Будьте внимательнее при копировании.
1
sanekmihailow
0 / 0 / 1
Регистрация: 29.12.2011
Сообщений: 26
19.06.2012, 21:07  [ТС] #6
спасибо извиняюсь за невнимательность,при копировании нечаянно создалось еще одно end function,
все исправил -все работает
0
19.06.2012, 21:07
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
19.06.2012, 21:07
Привет! Вот еще темы с ответами:

Найти номер максимального элемента в этой последовательности - C++
Решить задачи в С++, с использованием основных операторов языка С++: 1)Дана последовательность из n целых чисел. Найти номер максимального...

Найти номер последнего максимального элемента в последовательности - C++
1)Дана последовательность из nхn элементов, найти номер последнего максимального элемента. Например Ввод 1 2 3 5 5 3 4 6 1 2 2 2 ...

Найти номер последнего максимального элемента последовательности - C++
дана последовательность из n действительных чисел. найти номер последнего максимального элемента

Найти номер максимального элемента в заданной последовательности - C++
Дана последовательность из n целых чисел. Найти номер максимального элемента в этой последовательности


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.