10 lines
162 B
Text
10 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
|