(
(
低效體現在兩處
(
(
正確的高效算法如下
const m=
TYPE ARR=ARRAY[
PROCEDURE delk(VAR A:ARR
{從數組A[
VAR count
BEGIN
IF(i<
THEN write(
ELSE[FOR count
last
END
[
From:http://tw.wingwit.com/Article/program/sjjg/201311/23054.html
(
(
低效體現在兩處
(
(
正確的高效算法如下
const m=
TYPE ARR=ARRAY[
PROCEDURE delk(VAR A:ARR
{從數組A[
VAR count
BEGIN
IF(i<
THEN write(
ELSE[FOR count
last
END
[