8 lines
111 B
Text
8 lines
111 B
Text
|
INTEGER I,J;
|
||
|
|
FOR I:=1 STEP 1 UNTIL 5 DO
|
||
|
|
BEGIN
|
||
|
|
FOR J:=1 STEP 1 UNTIL I DO
|
||
|
|
OUTTEXT("*");
|
||
|
|
OUTLINE
|
||
|
|
END
|