pascal 如何换行？

2025-05-03 13:29:24

推荐回答（3个）

回答（1）：

每次输五个数就 writeln一次，可以记录一下该行输了几个数。
k:=0;
for i:=1 to n do
begin
if i mod 3=2 then
begin
inc(k); write(i,' ');
end;
if k=5 then
begin
writeln; k:=0;
end;
end;

回答（2）：

I can！
比如你已经把所有满足条件的数存进a数组，然后m是满足这个条件的数的数量。
for i:=1 to m do
if i mod 5=0 then writeln(a[i]) else write(a[i],' '）;
还有，摩尔庄园是白痴游戏，以后别去碰他了

回答（3）：

枚举