RosettaCodeData/Task/Loops-Do-while/Mathematica/loops-do-while.math
2023-07-01 13:44:08 -04:00

6 lines
62 B
Text

value = 0;
While[
value++;
Print[value];
Mod[value,6]!=0
]