[ Obiect ] recursiv

var r := Obiect crea.
r la: ['∞'] execută: { :x
Stdout scrie: x, stop.
(x < 3) adevărat: { self recursiv ∞ (x + 1). }.
}.
r ∞ 1. 1
2
3

Go to homepage

2024-9-22 0:16