Repeat: Difference between revisions
Content added Content deleted
(add Standard ML) |
No edit summary |
||
Line 1,210: | Line 1,210: | ||
false. |
false. |
||
</pre> |
</pre> |
||
=={{header|PureBasic}}== |
|||
<lang PureBasic>Prototype.i fun(x.i) |
|||
Procedure.i quark(z.i) |
|||
Debug "Quark "+Str(z) : ProcedureReturn z-1 |
|||
EndProcedure |
|||
Procedure rep(q.fun,n.i) |
|||
Repeat : n=q(n) : Until n=0 |
|||
EndProcedure |
|||
rep(@quark(),3)</lang> |
|||
{{out}} |
|||
<pre>Quark 3 |
|||
Quark 2 |
|||
Quark 1</pre> |
|||
=={{header|Python}}== |
=={{header|Python}}== |