[ Objekt ] rekurzivní

var r := Objekt nový.
r na: ['∞'] udělat: { :x
Stdout psát: x, stop.
(x < 3) pravda: { self rekurzivní ∞ (x + 1). }.
}.
r ∞ 1. 1
2
3

Go to homepage

2024-9-22 0:16