RosettaCodeData/Task/Loops-Do-while/Pop11/loops-do-while.pop11

7 lines
108 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
lvars val = 0;
while true do
val + 1 -> val;
printf(val, '%p\n');
quitif(val rem 6 = 0);
endwhile;