9 lines
162 B
Text
9 lines
162 B
Text
proc nonrec main() void:
|
|
byte i,j;
|
|
for i from 1 upto 5 do
|
|
for j from 1 upto i do
|
|
write("*")
|
|
od;
|
|
writeln()
|
|
od
|
|
corp
|