Вверх ↑
Ответов: 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