请问delphi中写入循环程序怎么实现在memo中能逐条把程序列出来?

发布网友发布时间：2024-10-24 04:42

共1个回答

热心网友时间：2024-10-24 09:29

while (i<=4) do
begin
memo.lines.add(format('%d=%d+%d',[sum+i,sum,i]));
sum := sum + i;
i := i +1;
end;

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。
E-MAIL:11247931@qq.com