9 lines
131 B
ObjectPascal
9 lines
131 B
ObjectPascal
begin
|
|
var a := Seq(1,2,3,4,5);
|
|
a.Println;
|
|
var z := 10;
|
|
var b := a.Select(x->x+z);
|
|
b.Println;
|
|
z := 20;
|
|
b.Println;
|
|
end. |