Add(Math,9050339,483,329)
{
OpType=38
link(onResult,12832715:doText,[])
link(Op1,9050339:Result,[(489,320)(475,320)(475,369)(489,369)])
}
Add(Math,2012656,483,273)
{
OpType=39
link(onResult,7171785:doText,[])
link(Op1,2012656:Result,[(489,264)(475,264)(475,313)(489,313)])
}
Add(MainForm,7652792,266,140)
{
Width=342
Height=393
link(onCreate,15873341:doFor,[])
}
Add(MinMax,11148593,483,161)
{
@Hint=#15:Компонент Tad-a|
DataCount=2
Mode=1
link(onCalc,154729:doText,[])
link(Data1,11148593:Result,[(489,152)(475,152)(475,201)(489,201)])
AddHint(79,-25,102,13,@Hint)
}
Add(Random,6573429,364,154)
{
Min=50
Mode=1
link(onRandom,6316580:doEvent1,[])
}
Add(For,15873341,315,154)
{
End=50
link(onEvent,6573429:doRandom,[])
}
Add(Label,154729,532,161)
{
Left=185
Top=55
}
Add(ListBox,9130392,483,98)
{
Left=10
Top=5
Width=165
Height=340
}
Add(Hub,6316580,413,154)
{
OutCount=7
link(onEvent1,9130392:doAdd,[(438,160)(438,104)])
link(onEvent2,11148593:doCalc,[])
link(onEvent3,14657048:doCalc,[(466,174)(466,223)])
link(onEvent4,2012656:doOperation,[(459,181)(459,279)])
link(onEvent5,9050339:doOperation,[(452,188)(452,335)])
link(onEvent6,7591115:doCalc,[(445,195)(445,391)])
link(onEvent7,16670094:doCalc,[(438,202)(438,447)])
}
Add(MinMax,14657048,483,217)
{
@Hint=#15:Компонент Tad-a|
DataCount=2
link(onCalc,557021:doText,[])
link(Data1,14657048:Result,[(489,208)(475,208)(475,257)(489,257)])
AddHint(79,-81,102,13,@Hint)
}
Add(Label,557021,532,217)
{
Left=185
Top=80
}
Add(Label,7171785,532,273)
{
Left=185
Top=155
}
Add(Label,12832715,532,329)
{
Left=185
Top=180
}
Add(MathParse,7591115,483,385)
{
MathStr="max(%1,%2)"
link(onResult,16271410:doText,[])
link(X1,7591115:Result,[(489,376)(475,376)(475,425)(489,425)])
}
Add(MathParse,16670094,483,441)
{
MathStr="min(%1,%2)"
link(onResult,3762055:doText,[])
link(X1,16670094:Result,[(489,432)(475,432)(475,481)(489,481)])
}
Add(Label,16271410,532,385)
{
Left=185
Top=245
}
Add(Label,3762055,532,441)
{
Left=185
Top=270
}
23232.jpg
Понятно, что мы сразу сравниваем с нулём. А если мне нужно найти поток разной длины из цифр, кроме нуля?
------------ Дoбавленo в 09.09:
Чтобы найти минимальное значение в потоке нужно слепить вот такую схему.
Add(MainForm,7652792,105,112)
{
Width=342
Height=393
link(onCreate,6230537:doEvent1,[])
}
Add(Random,6573429,245,133)
{
Min=50
Mode=1
link(onRandom,6316580:doEvent1,[])
}
Add(For,15873341,189,133)
{
End=50
link(onEvent,6573429:doRandom,[])
link(onStop,1267123:doDelete,[(228,146)(228,209)])
}
Add(ListBox,9130392,336,70)
{
Left=10
Top=5
Width=165
Height=340
}
Add(Hub,6316580,294,133)
{
link(onEvent1,9130392:doAdd,[(319,139)(319,76)])
link(onEvent2,15210857:doStrCat,[])
}
Add(MathParse,16670094,518,196)
{
MathStr=""
Point(doMathStr)
link(onResult,3762055:doText,[])
}
Add(Label,3762055,567,196)
{
Left=185
Top=270
}
Add(StrCat,3436990,392,140)
{
Point(doClear)
link(Str1,9192947:Var1,[(398,131)(384,131)(384,187)])
}
Add(Delete,1267123,385,203)
{
Count=1
Direction=1
link(onDelete,5059956:doString,[])
link(Str,9192947:Var2,[])
}
Add(GetDataEx,9192947,385,182)
{
Angle=1
link(Data,3436990:Result,[(398,187)])
}
Add(FormatStr,5059956,434,203)
{
DataCount=1
Mask="min(%1)"
link(onFString,4336206:doEvent1,[])
}
Add(Hub,4336206,476,203)
{
link(onEvent1,16670094:doMathStr,[])
link(onEvent2,16670094:doCalc,[(501,216)(501,202)])
}
Add(StrCat,15210857,336,140)
{
Str2=","
link(onStrCat,3436990:doStrCat,[])
}
Add(Hub,6230537,154,126)
{
link(onEvent1,3436990:doClear,[(375,132)(375,153)])
link(onEvent2,15873341:doFor,[])
}