这里已经没有活人了，没有了

pascal已经过时了，连各种比赛都淘汰了pascal。也该离开了。

这么说我不是人咯？

哎竟然有活人啊……

……

pascal早凉了

那你是什么诈尸吗

凉了凉了

活人啥的不可能吧

const n=200;
var i,b,s:longint;
begin
s:=0; b:=1;
while 1=1 do
begin
s:=s+b;
for i:=1 to abs(s-1) do write(' '); writeln('o'); if s=n then b:=-b; if s=0 then b:=-b; end; end.