16 lines
293 B
Text
16 lines
293 B
Text
set_ns(rosettacode);
|
|
|
|
add_var({str},s)_value();
|
|
add_var({str},output);
|
|
|
|
add_for({int},i)_from(1)_uptoand(5)_inc()
|
|
with_var(s)_v();
|
|
add_for({int},j)_from(0)_upto([i])_inc()
|
|
with_var(s)_calc([s]&="*");
|
|
;
|
|
with_var(output)_calc(&=[s]&\n);
|
|
;
|
|
|
|
me_msg([output]);
|
|
|
|
reset_ns[];
|