Do[Print[i!], {i,5}] i=1,2,3,4,5 Do[Print[2^i], {i,0,5}] i=0,1,2,3,4,5 Do[Print[I^i], {i,0,10,3}] i=0,3,6,9 r=1; Do[r=1/(1+r), 100]; r 100回 Do[Print[i], i,2a,4a,a] i=2a,3a,4a Do[Print[r], r,0.0,3.5] r=0.0,1.0,2.0,3.0 Do[Print[i,j], i,3, j,i] for (i=1; i<=3; i++) for (j=1; j <= i; j++) Print {i,j}
^
for (i=1; i<=3; i++)
for (j=1; j <= i; j++)
Print {i,j}
i=1; While[i <= 10, Print[i]; i++]
i <= 10
Print[i]; i++
For[i=1, i <=10, i++, Print[i, " ", i^2]]