在讨论《学霸快来看看，答案都是对的，就是不过》回复：

啊啊啊！强势啊

在讨论《Pascal,为什么60，#3，#5运行时错误》回复：

好吧，i并没有什么用

在讨论《Pascal,为什么60，#3，#5运行时错误》回复：

```cpp var k,i:integer; n:int64; sn:real; a:boolean; begin read(k); repeat n:=n+1; sn:=sn+1/n; if sn>k then a:=true; until a; write(n); end. ```

在讨论《Pascal做法（好像感觉更乱、更复杂了呢）》回复：

@[Errorman碩](/space/show?uid=18936) 前面我write后有好几个字符串，用writeln的话就打一个换一行了。

在讨论《怎么回事？！？！？！？！！！？？》回复：

评测出问题了吧，所有评测点的read和expected都一样，说明你算对了

```cpp var i:integer; begin write(' ':16,'********'); writeln; write(' ':15,'************'); writeln; write(' ':15,'####....#.'); writeln; write(' ':13,'#..###.…