Visual Basic . "Лестница!" - VB

Узнай цену своей работы

Формулировка задачи:

Ребята.Нужна ваша помощь в решении задачи. Есть лестница,состоящая из N ступенек. Нужно подняться с первой на последнюю ступеньку. Но некоторые ступеньки подпилены . Это всё задаётся пользователем. То есть используется массив ступенек. К примеру, N=6 , A=(1,0,1,1,0,1) 1-целая ступень,0-подпиленная Нужно найти ВСЕ возможные варианты. К примеру,для данного случая будет 3 варианта: 1) С первой на третью,потом на четвёртую,и на последнюю 2) С первой на третью,потом на последнюю 3) С первой на четвёртую,и на последнюю Есть код на 1С 8.1 =)))) если кто-то сможет интерпретировать его для VB ?)

Решение задачи: «Visual Basic . "Лестница!"»

textual
Листинг программы
'в текстовое поле ввести строку в формате "1,0,1,1,0,1" (без пробелов!)
a=split(textbox1.text, ",")
'дальше все так же как было

Оцени полезность:

10   голосов , оценка 3.9 из 5
Похожие ответы