Advertisement
Guest User

Untitled

a guest
Jul 22nd, 2019
91
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.11 KB | None | 0 0
  1. even = {} ;
  2. i = 1;
  3. While[i <= 5, Print[i];If[EvenQ[i], AppendTo[even, i]]; i++]
  4.  
  5. even
  6. (*{2, 4}*)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement