Skip to main content
added 247 characters in body
Source Link
sergiol
  • 4.2k
  • 1
  • 17
  • 37

Tcl, 3927 bytes

time {puts [string repe *[append [incrs i]]*]} $n 

Try it online!Try it online!


# [Tcl], 39 bytes
time {puts [string repe * [incr i]]} $n 

Try it online!


# [Tcl], 46 bytes
while {[incr i]<=$n} {puts [string repe * $i]} 

Try it online!

Tcl, 39 bytes

time {puts [string repe * [incr i]]} $n 

Try it online!


# [Tcl], 46 bytes
while {[incr i]<=$n} {puts [string repe * $i]} 

Try it online!

Tcl, 27 bytes

time {puts [append s *]} $n 

Try it online!


# [Tcl], 39 bytes
time {puts [string repe * [incr i]]} $n 

Try it online!


# [Tcl], 46 bytes
while {[incr i]<=$n} {puts [string repe * $i]} 

Try it online!

added 163 characters in body
Source Link
sergiol
  • 4.2k
  • 1
  • 17
  • 37

#tcl, 39

Tcl, 39 bytes

time {puts [string repe * [incr i]]} $n 

#demoTry it online!

 
#tcl# [Tcl], 46 bytes
while {[incr i]<=$n} {puts [string repe * $i]} 

#demoTry it online!

  

#tcl, 39

time {puts [string repe * [incr i]]} $n 

#demo

#tcl, 46
while {[incr i]<=$n} {puts [string repe * $i]} 

#demo

 

Tcl, 39 bytes

time {puts [string repe * [incr i]]} $n 

Try it online!

 
# [Tcl], 46 bytes
while {[incr i]<=$n} {puts [string repe * $i]} 

Try it online!

 

added 126 characters in body
Source Link
sergiol
  • 4.2k
  • 1
  • 17
  • 37

#tcl, 4639

while {[incr i]<=$n}time {puts [string repe * $i][incr i]]} $n 

#demodemo

#tcl, 46
while {[incr i]<=$n} {puts [string repe * $i]} 

#demo

#tcl, 46

while {[incr i]<=$n} {puts [string repe * $i]} 

#demo

#tcl, 39

time {puts [string repe * [incr i]]} $n 

#demo

#tcl, 46
while {[incr i]<=$n} {puts [string repe * $i]} 

#demo

Source Link
sergiol
  • 4.2k
  • 1
  • 17
  • 37
Loading