Вверх ↑
Ответов: 3889
Рейтинг: 362
#1: 2012-02-20 21:24:45 ЛС | профиль | цитата
Roma, для каждого элемента массива запоминать его и его номер в переменных и сравнивать со следующим, если запомненное больше, то заменяем его на найденное меньшее, запоминаем номер элемента и продолжаем перебор. Если следующий элемент больше запомненого, то ничего не делаем, продолжаем перебор.
------------ Дoбавленo в 21.24:

Add(MainForm,2953706,21,105)
{
link(onCreate,1697911:doFor,[])
}
Add(For,1697911,112,119)
{
End=99
link(onEvent,12080870:doRandom,[])
link(onStop,2838087:doEnum,[(183,132)(183,188)])
}
Add(Random,12080870,210,119)
{
link(onRandom,12454355:doAdd,[])
}
Add(StrList,12454355,259,119)
{
}
Add(ArrayEnum,2838087,273,182)
{
link(onItem,8573360:doCompare,[])
link(onEndEnum,12899620:doMessage,[(321,195)(321,223)])
link(Array,12454355:Array,[])
}
Add(If_else,8573360,329,182)
{
Type=1
link(onTrue,11064432:doValue,[(462,188)(462,96)(324,96)(324,139)])
link(Op2,5310383:Var2,[])
}
Add(Memory,11064432,336,133)
{
Default=Integer(999)
Point(Data)
link(onData,13055408:doValue,[])
link(Data,4027594:Var,[])
}
Add(Memory,13055408,392,133)
{
Point(Data)
link(Data,15288093:Var,[])
}
Add(LineBreak,6377843,280,224)
{
Type=1
link(Data,2838087:Index,[])
Primary=[15288093,112,-119]
}
Add(Message,12899620,385,217)
{
link(Message,5310383:Var3,[(391,173)])
link(Caption,13055408:Value,[])
}
Add(GetDataEx,5310383,336,168)
{
link(Data,11064432:Value,[])
}
Add(LineBreak,14440516,273,224)
{
Type=1
link(Data,2838087:Item,[])
Primary=[4027594,63,-119]
}


карма: 1

1
Голосовали:Roma