...
| Blok kódu | ||||
|---|---|---|---|---|
| ||||
INIT REAL _max _max := H.Struct[1]^Voltage ; inicializacia (predpokladáme, že štruktúra má aspoň 1 riadok) LOOP_TEMPLATE_START #LOOP_TEMPLATE_PAR#, 1, H.Struct IF H.Struct[#LOOP_TEMPLATE_PAR#]^Voltage\VLD & H.Struct[#LOOP_TEMPLATE_PAR#]^Voltage > _max THEN _max := H.Struct[#LOOP_TEMPLATE_PAR#]^Voltage ENDIF LOOP_TEMPLATE_END FINALLY _max |
Hľadanie maxima zo stĺpca H.Struct^Voltage (iba riadky 5 - 30)
| Blok kódu | ||||
|---|---|---|---|---|
| ||||
INIT REAL _max _max := H.Struct[15]^Voltage ; inicializacia (predpokladáme, že štruktúra má aspoň 1 riadok) LOOP_TEMPLATE_START #LOOP_TEMPLATE_PAR#, 5, 30 IF H.Struct[#LOOP_TEMPLATE_PAR#]^Voltage\VLD & H.Struct[#LOOP_TEMPLATE_PAR#]^Voltage > _max THEN _max := H.Struct[#LOOP_TEMPLATE_PAR#]^Voltage ENDIF LOOP_TEMPLATE_END FINALLY _max |
...