如何在 smalltalk 中获得新行？

Question

我想使用 smalltalk 代码以以下格式显示数字

     1
     1 2
     1 2 3
     1 2 3 4

我写了以下代码

| i j y k |
i :=1.
j :=1.
y:= ('y' at: 1 put: $ )out.

(i<=4)ifTrue: [
i to: 4 by:1 do:[:i |


     (j<=i)ifTrue: [
     j to: i by: 1 do:[:j |

         ( j print++y print)out.

         ]
            ]

     ]
]

当我执行上述程序时，它以以下格式显示数字

输出：

1 ' '
1 ' '
2 ' '
1 ' '
2 ' '
3 ' '
1 ' '
2 ' '
3 ' '
4 ' '

任何人都可以帮助我以金字塔格式显示输出以及在 smalltalk 中获取新行的方法

Answer 1

试试下面的一段代码。

|n|
Transcript cr.
n := 4.
1 to: n do: [:i |
    1 to: i do: [:j |
        Transcript show: j].
    Transcript cr].

回答您的问题：您通过 Transcript cr 获得换行符，然后将其发送给 Character cr。