主题：怎么改成循环语句？？

使用数组

仅供参考

VARIABLE:def[14]=0,xyz[14]=0;
for i=13 to 1  do

begin
if abc>i then sss:=def[i+1];

if abc<-i then sss:=xyz[i+1];
end

VARIABLE:def[14]=0,xyz[14]=0；

def[] 和xyz[] 可以存放不同价格

你要分开赋值，就好比

def[1]:=1231;

def[2]:=34343;

def[3]:=54545;

……

VARIABLE:def[14]=0,xyz[14]=0;
for i=13 to 1  do

begin
if abc<i+1 and abc>i then sss:=def[i+1];

if abc>-i-1 and abc<-i then sss:=xyz[i+1]

end

这样设计 符合elseif 的逻辑 ，细节上有点出入，你的具体的情况不明，只写思路，仅供参考。

abc<i+1 and abc>i

从14 开始 一直到1 ，每当满足 在此范围相邻两个数之间的数 sss就会被赋值（假如= 条件 更好，就不会落下整数情况）

请问怎么会abc不存在

不好意思 上一贴打错了字

  我想说存在上诉情况，应看你的需求在条件中加入等号条件

就是

abc<i+1 and abc>=i

或者是 

abc<=i+1 and abc>i

酌情处理吧