計(jì)算機(jī) - 話題

lyh2006 發(fā)表于 2010-08-13 23:49
Re:Procedure SelectSort(Var R : FileType); //對R[1..N]進(jìn)行直接選擇排序 //
  Begin
    for I := 1 To N - 1 Do //做N - 1趟選擇排序//
     begin
      K := I;
      For J := I + 1 To N Do //在當(dāng)前無序..