[ Objeto ] recursivo

var r := Objeto novo.
r em: ['∞'] fazer: { :x
Stdout escrever: x, punto.
(x < 3) verdadeiro: { self recursivo ∞ (x + 1). }.
}.
r ∞ 1. 1
2
3

Go to homepage

2024-9-22 0:16