请问怎么在for循环中设置步长(100分)

F

feather

Unregistered / Unconfirmed
GUEST, unregistred user!
也就是每次循环时不是只递增,递减1,而是按我给的值递增递减
 
要是C++就容易了:)
Pascal我不大懂.
 
变量,WHILE DO
 
pascal里面好象没有吧,可以用repeat或while代替
 
pascal 里没有。
 
var
i,n,K,x:integer;
K:=0;x:=3;n:=100;
begin
for i:=1 to n do
begin
inc(k,X);
/// 用 K
end;
 
为什么非用For不可,for的效率也没有while高呀。
 
object pascal 里没有,换种方法吧
 
建议用while
 
delphi中没有这种功能,可以参照如下的贴子:
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1492543
 
delphi中没有这种功能。
 
同决楼上的,用for的话,除非你在for循环体中用i:=i+1;的方式变成step = 2

 
同意楼上
 
有设置步长的但是不知道怎么用..也忘记了..怎么写..一定有..
 
var
i: Integer;
begin
for i := 0 to 100 do
begin
Inc(i, 步长-1);
.....
end;
end;
上面的方法好象在Delphi3.0以前是支持的,现在你还是用while吧
 
Turbo pascal 5 ,6 ,7 都可以改 控制变量
DELHPI 以后就和 经典Pascal 一样不能改 for 的 控制变量了
 
多定义一个变量不就解决问题了吗
 
var i,n:integer;
begin
n:=3;//设置步长
for i:=0 to 100 do
begin
if (i mod n)=0 then
begin
ShowMessage(inttostr(i));
end;
end;
 

Similar threads

回复
0
查看
683
不得闲
S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
989
SUNSTONE的Delphi笔记
S
S
回复
0
查看
977
SUNSTONE的Delphi笔记
S
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
顶部