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