10 lines
143 B
Text
10 lines
143 B
Text
|
begin
|
||
|
|
integer i,j;
|
||
|
|
for i:=1 step 1 until 5 do
|
||
|
|
begin
|
||
|
|
for j:=1 step 1 until i do
|
||
|
|
outtext("*");
|
||
|
|
outimage
|
||
|
|
end
|
||
|
|
end
|