RosettaCodeData/Task/Loops-For/Mathematica/loops-for.math
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

6 lines
91 B
Text

n=5;
For[i=1,i<=5,i++,
string="";
For[j=1,j<=i,j++,string=string<>"*"];
Print[string]
]