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

  • 主题发起人 主题发起人 feather
  • 开始时间 开始时间
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

Ray
[转]终于可以发布Delphi下收点OSGI精髓皮毛而设计的插件框架WisdomPluginFramework
回复
4
查看
4K
chlkuei
C
M
for 循环的简单问题(50分)
回复
12
查看
193
manmanchong
M
P
很简单的问题，关于For循环,既然大家不知道，我再换一个简单问题 (20分)
回复
12
查看
151
plf22
P
阿
一个奇怪的问题，我在delphi中用循环给数组赋值，但数组的下标array[i]中的i竟然不变 (30分)
回复
17
查看
155
jsxjd
J
S
在for i:=1 to 6 的循环中为什么i是从6到1(20分)
2
回复
23
查看
330
wr960204
W
后退
顶部