Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 | 2 |

 

  Вопрос: ПОМОГИТЕ!!!!!!!!!!!СРОЧНО!!!!!!!!!!!!!!!!!!!!!!!! Добавлено: 22.05.08 21:27  

Автор вопроса:  Алексей
Народ прошу вас помочь, правда очень надо, сам я в этом неочень! Заранее огромное человеческое спасибо!

Ответить

  Ответы Всего ответов: 17  

Номер ответа: 1
Автор ответа:
 Алексей



Вопросов: 2
Ответов: 6
 Профиль | | #1 Добавлено: 22.05.08 21:30
вот задание :
Определите, что делает следующая программа. Опишите в бланке ответа, что служит входными данными для программы. Что выводит программа в зависимости от входных данных?

Программа на языке Бейсик
DIM K,n,i,b,L,R, a(1000) AS
INTEGER
INPUT К
INPUT n
FOR i = I TO n
INPUT a(i)
NEXT i
b = I
FOR i = 2 TO n
IF a(i 1) >= a(i) THEN b - 0
NEXT i
IF b - 0 THEN
PRINT "данные некорректны"
GOTO 10 END IF
L = 1: R = n b = 0
WHILE (L <*= R) AND (b - 0) m - (L + R) \ 2
IF a(m) = К THEN b - 1 ELSE b = 0
IF a(m) < К THEN L = m + 1
ELSE R = m - 1 END IF WEND
IF b = 1 THEN PRINT m ELSE PRINT 0 10 END

Ответить

Номер ответа: 2
Автор ответа:
 Smith



ICQ: adamis@list.ru 

Вопросов: 153
Ответов: 3632
 Профиль | | #2 Добавлено: 22.05.08 21:31
Не вопрос, уже помогаем, зналибы по подробнее в чём именно помочь надо, ещё лучше помогли бы.

Ответить

Номер ответа: 3
Автор ответа:
 Smith



ICQ: adamis@list.ru 

Вопросов: 153
Ответов: 3632
 Профиль | | #3 Добавлено: 22.05.08 21:32
млин опоздал я со своим ответом

Ответить

Номер ответа: 4
Автор ответа:
 Smith



ICQ: adamis@list.ru 

Вопросов: 153
Ответов: 3632
 Профиль | | #4 Добавлено: 22.05.08 21:36
FOR i = I TO n
тут похоже опечатка на опечатке

Ответить

Номер ответа: 5
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #5
Добавлено: 22.05.08 21:52
ага, похоже на то
END IF WEND - прям в строчку через пробел и заработает?

Ответить

Номер ответа: 6
Автор ответа:
 Алексей



Вопросов: 2
Ответов: 6
 Профиль | | #6 Добавлено: 22.05.08 21:53
да согласен опечатка (за неё извиняюсь)
вот правельный текст:
DIM K,n,i,b,L,R, a(1000) AS
INTEGER
INPUT К
INPUT n
FOR i = 1 TO n
INPUT a(i)
NEXT i
b = 1
FOR i = 2 TO n
IF a(i-1) >= a(i) THEN b = 0
NEXT i
IF b = 0 THEN
PRINT "данные некорректны"
GOTO 10
END IF
L = 1: R = n
b = 0
WHILE (L <= R) AND (b = 0)
m = (L + R) \ 2
IF a(m) = К THEN b = 1 ELSE b = 0
IF a(m) < К THEN
 L = m + 1
ELSE R = m - 1
END IF
WEND
IF b = 1 THEN PRINT m ELSE PRINT
0
10 END

Ответить

Номер ответа: 7
Автор ответа:
 Smith



ICQ: adamis@list.ru 

Вопросов: 153
Ответов: 3632
 Профиль | | #7 Добавлено: 22.05.08 22:03
GOTO 10 END IF
а где тогда нумерация строк?
Ну даже если тупо 10 строка по порядку, всё равно какой смысл создавать цикл ?
10 NEXT i
11 IF b - 0 THEN
12 PRINT "данные некорректны"
13 GOTO 10
14 End If


Жди математиков криптографов.

Ответить

Номер ответа: 8
Автор ответа:
 Алексей



Вопросов: 2
Ответов: 6
 Профиль | | #8 Добавлено: 22.05.08 22:04
Слухай Smith давай я те на мыло само заданее сброшу???

Ответить

Номер ответа: 9
Автор ответа:
 Smith



ICQ: adamis@list.ru 

Вопросов: 153
Ответов: 3632
 Профиль | | #9 Добавлено: 22.05.08 22:21
Ага, у меняж налбу написано "свящченик энтузизяст" :)

Лёш на какое мыло ты вздумал своё задание бросать?

Определите, что делает следующая программа. Опишите в бланке ответа, что служит входными данными для программы. Что выводит программа в зависимости от входных данных?


ВОПРОС = Что делает?
ОТВЕТ = Не работает.

ВОПРОС = Что служит входными данными.
ОТВЕТ = Цифры

ВОПРОС = Что выводит программа.
ОТВЕТ = Щас спокойно почитаю твой код до конца и соображу чего он выводит :)

А чё те горит чтоли в 11-том часу?

Ответить

Номер ответа: 10
Автор ответа:
 Алексей



Вопросов: 2
Ответов: 6
 Профиль | | #10 Добавлено: 22.05.08 22:25
Просто если я ету хренотень завтра с утра не здам, у мя в атестате будет тройкой больше.
А позно так, потому что тока домой пришёл.
А задача эта из какойто контрольной....

Ответить

Номер ответа: 11
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #11
Добавлено: 22.05.08 22:56
GOTO 10 - это тупо переход к метке "10"
Она находится перед End
елементарно:)

Ответить

Номер ответа: 12
Автор ответа:
 Smith



ICQ: adamis@list.ru 

Вопросов: 153
Ответов: 3632
 Профиль | | #12 Добавлено: 22.05.08 23:03
Ну я тупо не дочитал до конца. Кстати он уже и вопрос поновой задал.

Ответить

Номер ответа: 13
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #13
Добавлено: 22.05.08 23:32
переменная m не объявлена. Вряд ли заработает.

Программа:
Вводим некое число K
Вводим количество чисел в массиве n
Вводим числа массива 'a'
Каждое следущее число должно быть меньше предыдущего
Ищем число K в массиве a()
Если число найдено выводим индекс элемента массива, если нет, выводим ноль

Ответить

Номер ответа: 14
Автор ответа:
 D o c a l



ICQ: 408802757 

Вопросов: 76
Ответов: 985
 Web-сайт: www.doc-source.pp.net.ua/
 Профиль | | #14
Добавлено: 23.05.08 01:37
Долбанутое задания сначала приравниваем b=0 а потом проверяем а равно ли b нулю.Ачуметь.
Если предпоследние число в массиве "а" больше за послеДние тогда выдаст даные не коректны.Иначе програма находит средний елемент масива.И если значения его значения равное какомуто К тогда выводим середний елемент масива(номер не значения).Если не равно выводим 0.

Ответить

Номер ответа: 15
Автор ответа:
 D o c a l



ICQ: 408802757 

Вопросов: 76
Ответов: 985
 Web-сайт: www.doc-source.pp.net.ua/
 Профиль | | #15
Добавлено: 23.05.08 01:39
Ой сор не посмотрел что там цыкл.Все там норм из проверкой

Ответить

Страница: 1 | 2 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам