delphi中遞增或遞減循環怎麽寫？

這不是標準意義，而是FOR循環。在DELPHI中，妳只能使用WHILE循環來實現這個功能，因為妳的循環結束條件是變化的。

德爾福的周期如下:

對於控制變量:=初始值到最終值[步長]

編譯成匯編時，利用匯編的LOOP循環實現，不需要檢測每個循環最終值是否變化，是壹個非常高效的FOR循環。

m:=((2 * n/100)-1)；

while(m & gt；= (n / 100))做

開始

k:= 1000/(m-(j++))；

sum:= sum+k；

m:= m-1；

結束；