6 lines
109 B
Text
6 lines
109 B
Text
for {set i 1} {$i <= 5} {inc i} {
|
|
for {set j 1} {$j <= $i} {inc j} {
|
|
write "*"
|
|
}
|
|
print
|
|
}
|