...
| Blok kódu | ||||
|---|---|---|---|---|
| ||||
INIT REAL _sum LOOP_TEMPLATE_START #LOOP_TEMPLATE_PAR# low_range1, high_rangeH.Struct IF H.Struct[#LOOP_TEMPLATE_PAR#]^Current\VLD THEN _sum := _sum + H.Struct[#LOOP_TEMPLATE_PAR#]^Current ENDIF LOOP_TEMPLATE_END FINALLY _sum |
...
| 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 Voltage (iba riadky 5 - 30)
| 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# 5, 30 low_range, high_range 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 |
...