pascalabcnet/_Presentations/2015 New Features/Programs/25_lambda5.pas

5 lines
109 B
ObjectPascal
Raw Permalink Normal View History

2015-05-14 22:35:07 +03:00
begin
SeqGen(1,x->x+2,10).Println;
SeqGen(1,x->x*2,10).Println;
SeqGen(1,1,(x,y)->x+y,10).Println;
end.