FileBlockShemEditorV2s/u1K/M1DfFhbegin62end?6Ufunction combines(n,m:integer):integer number of combines from n for mKGMItGvIResult:=0;-Vkdnn/2V\rnoH`Zjyes`j"J68Result:=1m=0VnoHZyesn:=n+1; Result:=1; i:=1;V %!" "fhfh $ &$&  Result:=Result*(n-1)/i; i:=i+1 bi<=m V %/-!0.,-.,*1]0++*no yesP b/04>>