Flow-control structures: Difference between revisions
Content added Content deleted
Walterpachl (talk | contribs) m (→raising conditions: fix lang tag) |
Walterpachl (talk | contribs) (→select: when op=='**') |
||
Line 1,840: | Line 1,840: | ||
when op=='∙' then do; r=a*b; prod=prod*r; end /*multiply.*/ |
when op=='∙' then do; r=a*b; prod=prod*r; end /*multiply.*/ |
||
when op=='*' then r=a*b /*multiply. */ |
when op=='*' then r=a*b /*multiply. */ |
||
when op=='**' then r=a**b /*power (exponentiation) */ |
|||
when op=='/' & b\=0 then r=a/b /*divide. */ |
when op=='/' & b\=0 then r=a/b /*divide. */ |
||
when op=='%' & b\=0 then r=a/b /*interger divide. */ |
when op=='%' & b\=0 then r=a/b /*interger divide. */ |