VBNet - Форум - Помогите написать программу!!!

Вопрос: Помогите написать программу!!! Добавлено: 08.05.10 22:31

Автор вопроса: firemix

Игра «Сосиска»

Как известно, длинную сосиску можно есть с двух концов одновременно…
Сосиска представляет собой набор случайных чисел (к примеру, двузначных). Пользователь и компьютер ходят по очереди, «откусывая» число с левого или с правого конца сосиски. Победит тот, кто в итоге наест большую сумму.
Пользователь вводит свой выбор, компьютер играет по определённой тактике. Есть и выигрышные тактики компьютера при его первом ходе, и случайные. Можно предоставить право первого хода пользователю.
консольное приложение.

Написал начало:
Module Module1

Sub Main()
Dim b, n, m, l As Long
n = Console.ReadLine
Dim x(n) As Integer
For i = 1 To n
x(i) = 10 + Int((99 - 10 + 1) * Rnd())
Console.Write(x(i) & " ")
Next
Console.WriteLine(" ")
Console.ReadLine()
End Sub

End Module

Эта часть выводит вводимое количество двузначных чисел.А как дальше, штопор.Оч прошу, помогите или хоть идею подскажите оч буду благодарен)
Тактика компьютера- выбор одного из больших чисел(справа или слева)

Ответить

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

Номер ответа: 1 Автор ответа: Sharp Лидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979	Web-сайт: sharpc.livejournal.com Профиль \| \| #1	Добавлено: 09.05.10 00:52
	Храни индексы левого и правого края, меняя один из них при выборе соответствующей стороны. Ответить

Номер ответа: 2 Автор ответа: VbStarter ICQ: 357911808 Вопросов: 118 Ответов: 1340	Web-сайт: moscowdevils.ru Профиль \| \| #2	Добавлено: 15.05.10 21:03
	ненадо дублировать темы! <> Ответить

Страница: 1 |